A347655 - OEIS

%I #7 Sep 04 2023 10:08:43

%S 1,1,2,3,4,5,7,8,10,11,13,14,17,19,22,24,28,31,34,37,42,44,50,53,59,

%T 61,69,71,80,82,90,93,103,106,117,121,134,137,150,154,169,173,188,194,

%U 212,216,235,240,259,264,284,288,310,314,337,342,368,370,398,403,432

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

%t Table[Count[IntegerPartitions[n,4],_?(AllTrue[#,SquareFreeQ]&)],{n,0,100}] (* _Harvey P. Dale_, Sep 04 2023 *)

%Y Cf. A005117, A073576, A308767, A347648, A347649, A347656, A347657.

%K nonn

%O 0,3

%A _Ilya Gutkovskiy_, Sep 09 2021