Polynomial moment integral of coordinates over a region
RegionMoment[reg, {i1, i2, …, in}]
RegionMoment[Ball[], {2, 2, 4}]
→ (4*Pi)/3465RegionMoment[Ball[{0, 0, 0}, r], {2, 2, 4}]
→ (4*Pi*r^11)/3465Table[RegionMoment[Disk[], {n, n}], {n, 0, 10}]
→ {Pi, 0, Pi/24, 0, (3*Pi)/640, 0, (5*Pi)/7168, 0, (35*Pi)/294912, 0, (63*Pi)/2883584}