login
Number of partitions of n into at most 5 squarefree parts.
2

%I #7 Aug 27 2023 15:46:14

%S 1,1,2,3,4,6,8,10,12,15,18,21,24,29,33,39,43,51,56,65,71,81,89,101,

%T 108,122,132,147,157,175,187,206,218,241,257,282,298,327,346,378,397,

%U 434,457,498,520,567,595,644,671,726,759,816,848,911,949,1017,1053,1129,1172

%N Number of partitions of n into at most 5 squarefree parts.

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

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

%K nonn

%O 0,3

%A _Ilya Gutkovskiy_, Sep 09 2021