A347761 Number of compositions (ordered partitions) of n into at most 6 prime parts (counting 1 as a prime).

1, 1, 2, 4, 7, 14, 26, 49, 87, 143, 220, 316, 435, 576, 739, 911, 1100, 1297, 1541, 1798, 2113, 2405, 2785, 3136, 3648, 4061, 4670, 5080, 5828, 6301, 7261, 7692, 8751, 9059, 10379, 10681, 12329, 12435, 14354, 14335, 16847, 16673, 19588, 18866, 22247, 21257

Offset: 0

Author

Ilya Gutkovskiy, Sep 12 2021

Keywords

• nonn

Crossrefs

Cf. A008578, A280917, A341985, A347703, A347743, A347744, A347745, A347760.

Programs

Mathematica

Table[Length@Flatten[Permutations/@IntegerPartitions[n,6,Join[{1},Prime@Range@PrimePi@n]],1],{n,0,45}] (* Giorgos Kalogeropoulos, Sep 12 2021 *)