|
%I #7 Sep 13 2021 11:37:39
%S 1,1,2,4,6,9,11,14,18,23,25,26,28,37,42,44,46,57,66,70,68,79,88,96,92,
%T 106,115,124,118,134,143,149,142,161,176,187,178,210,221,235,214,251,
%U 266,280,262,300,328,335,308,350,379,385,342,396,425,447,392,442,475
%N Number of compositions (ordered partitions) of n into at most 3 squarefree parts.
%t Table[Length@Flatten[Permutations/@IntegerPartitions[n,3,Select[Range@n,SquareFreeQ]],1],{n,0,58}] (* _Giorgos Kalogeropoulos_, Sep 13 2021 *)
%Y Cf. A005117, A280194, A280210, A347777, A347779, A347780.
%K nonn
%O 0,3
%A _Ilya Gutkovskiy_, Sep 13 2021
|
