A369340 Number of 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, 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 8, 9, 9, 9, 9, 10, 10, 10, 10, 11, 11, 11, 11, 12, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 14, 15, 15, 15, 15, 16, 16, 16, 16, 17, 17, 17, 17, 18, 18, 18, 18, 19, 19, 19, 19, 20, 20, 20, 20, 21, 108, 110, 112, 115, 118

Offset: 0

Author

Ilya Gutkovskiy, Jan 20 2024

Keywords

• nonn

Crossrefs

Cf. A001156, A097356.

Programs

Mathematica

Table[SeriesCoefficient[Product[1/(1 - x^(k^2)), {k, 1, Floor[n^(1/4)]}], {x, 0, n}], {n, 0, 85}]