• ← RandomPrime

SquaresR

Sum of squares function (WMA)

SquaresR[d, n]

returns the number of ways to represent n as a sum of d squares.

• • Table[SquaresR[2, n], {n, 10}]

• • Table[Sum[SquaresR[2, k], {k, 0, n^2}], {n, 5}]

• • Table[SquaresR[4, n], {n, 10}]

• • Table[SquaresR[6, n], {n, 10}]

• • Table[SquaresR[8, n], {n, 10}]