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,17

Links

Table of n, a(n) for n=0..85.

Mathematica

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

Crossrefs

Cf. A001156, A097356.

Sequence in context: A181943 A243757 A321689 * A368870 A076568 A139259

Adjacent sequences: A369337 A369338 A369339 * A369341 A369342 A369343

Keyword

nonn

Author

Ilya Gutkovskiy, Jan 20 2024

Status

approved