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

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A328325 A005705 A139542 * A238616 A302833 A093717

Adjacent sequences: A347653 A347654 A347655 * A347657 A347658 A347659

Keyword

nonn

Author

Ilya Gutkovskiy, Sep 09 2021

Status

approved