A291700 Number of ways of writing n as a sum of n nonnegative cubes.
1, 1, 1, 1, 1, 1, 1, 1, 9, 73, 361, 1321, 3961, 10297, 24025, 51481, 103081, 196521, 368425, 720937, 1589161, 4069801, 11511721, 33341353, 94142313, 253860201, 650564201, 1588228228, 3716917597, 8418378043, 18699454621, 41451042556, 93508305513, 218218347865, 530189399785
Offset: 0
Keywords
Links
Programs
-
Mathematica
Table[SeriesCoefficient[Sum[x^k^3, {k, 0, n}]^n, {x, 0, n}], {n, 0, 34}]
Formula
a(n) = [x^n] (Sum_{k>=0} x^(k^3))^n.