A347783 Number of compositions (ordered partitions) of n into at most 6 squarefree parts.
1, 1, 2, 4, 7, 14, 27, 51, 92, 155, 247, 376, 558, 805, 1118, 1495, 1962, 2551, 3282, 4127, 5106, 6286, 7750, 9442, 11326, 13459, 16037, 19011, 22277, 25804, 29939, 34692, 39938, 45455, 51736, 58848, 66696, 74836, 83927, 94114, 105372, 116992, 129902, 144223
Offset: 0
Keywords
Programs
-
Mathematica
Table[Length@Flatten[Permutations/@IntegerPartitions[n,6,Select[Range@n,SquareFreeQ]],1],{n,0,43}] (* Giorgos Kalogeropoulos, Sep 13 2021 *)