A347743 Number of compositions (ordered partitions) of n into at most 6 prime parts.

1, 0, 1, 1, 1, 3, 2, 6, 6, 10, 16, 20, 35, 46, 71, 98, 130, 182, 226, 295, 359, 430, 534, 626, 746, 880, 1019, 1196, 1392, 1574, 1815, 2063, 2313, 2655, 2941, 3275, 3669, 4017, 4441, 4917, 5295, 5852, 6365, 6957, 7575, 8198, 8839, 9511, 10374, 10958, 11931

Offset

0,6

Links

Table of n, a(n) for n=0..50.

Formula

a(n) = Sum_{k=1..6} A121303(n,k) for n >= 2. - Alois P. Heinz, Sep 11 2021

Mathematica

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

Crossrefs

Cf. A000040, A023360, A121303, A340962, A347739, A347740, A347741, A347742.

Sequence in context: A347741 A347742 A286970 * A023360 A154028 A157793

Adjacent sequences: A347740 A347741 A347742 * A347744 A347745 A347746

Keyword

nonn

Author

Ilya Gutkovskiy, Sep 11 2021

Status

approved