A369342 Number of compositions (ordered partitions) of n into squares not greater than sqrt(n).
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 95, 131, 181, 250, 345, 476, 657, 907, 1252, 1728, 2385, 3292, 4544, 6272, 8657, 11949, 16493, 22765, 31422, 43371, 59864, 82629, 114051, 157422, 217286, 299915, 413966, 571388, 788674, 1088589, 1502555
Offset: 0
Keywords
Programs
-
Mathematica
Table[SeriesCoefficient[1/(1 - Sum[x^(k^2), {k, 1, Floor[n^(1/4)]}]), {x, 0, n}], {n, 0, 46}]