A347656 Number of partitions of n into at most 5 squarefree parts.

1, 1, 2, 3, 4, 6, 8, 10, 12, 15, 18, 21, 24, 29, 33, 39, 43, 51, 56, 65, 71, 81, 89, 101, 108, 122, 132, 147, 157, 175, 187, 206, 218, 241, 257, 282, 298, 327, 346, 378, 397, 434, 457, 498, 520, 567, 595, 644, 671, 726, 759, 816, 848, 911, 949, 1017, 1053, 1129, 1172

Offset: 0

Author

Ilya Gutkovskiy, Sep 09 2021

Keywords

• nonn

Crossrefs

Cf. A005117, A073576, A308840, A347648, A347649, A347655, A347657.

Programs

Mathematica

Table[Count[IntegerPartitions[n,5],?(AllTrue[#,SquareFreeQ]&)],{n,0,60}] (* _Harvey P. Dale, Aug 27 2023 *)