A347779 Number of compositions (ordered partitions) of n into at most 4 squarefree parts.

1, 1, 2, 4, 7, 13, 21, 30, 41, 55, 75, 94, 111, 129, 158, 192, 224, 249, 290, 346, 403, 439, 488, 556, 639, 686, 749, 828, 939, 1002, 1081, 1173, 1304, 1373, 1464, 1579, 1750, 1838, 1963, 2111, 2337, 2423, 2574, 2740, 3023, 3120, 3292, 3511, 3858, 3978, 4157, 4413

Offset: 0

Author

Ilya Gutkovskiy, Sep 13 2021

Keywords

• nonn

Crossrefs

Cf. A005117, A280194, A341064, A347777, A347778, A347780.

Programs

Mathematica

Table[Length@Flatten[Permutations/@IntegerPartitions[n,4,Select[Range@n,SquareFreeQ]],1],{n,0,51}] (* Giorgos Kalogeropoulos, Sep 13 2021 *)