A369217 Number of partitions of n into squarefree parts not greater than sqrt(n).

1, 1, 1, 1, 3, 3, 4, 4, 5, 12, 14, 16, 19, 21, 24, 27, 30, 33, 37, 40, 44, 48, 52, 56, 61, 156, 172, 189, 207, 226, 247, 268, 291, 315, 340, 367, 892, 973, 1064, 1159, 1260, 1368, 1485, 1604, 1735, 1872, 2016, 2169, 2333, 5431, 5897, 6394, 6923, 7486, 8088, 8724

Offset: 0

Author

Ilya Gutkovskiy, Jan 16 2024

Keywords

• nonn

Crossrefs

Cf. A073576, A097356.

Programs

Mathematica

Table[SeriesCoefficient[Product[1/(1 - Boole[SquareFreeQ[k]] x^k), {k, 1, Floor[Sqrt[n]]}], {x, 0, n}], {n, 0, 55}]