%I #9 Sep 12 2021 09:50:14
%S 1,0,1,1,1,3,2,6,6,10,16,20,34,40,56,72,85,110,120,145,173,194,228,
%T 260,291,340,383,414,480,518,579,653,696,759,835,875,973,1041,1093,
%U 1201,1269,1406,1448,1617,1593,1818,1822,2035,1997,2318,2166,2647,2453,2897,2689,3277
%N Number of compositions (ordered partitions) of n into at most 5 prime parts.
%F a(n) = Sum_{k=1..5} A121303(n,k) for n >= 2. - _Alois P. Heinz_, Sep 11 2021
%t Table[Length@Flatten[Permutations/@IntegerPartitions[n,5,Prime@Range@PrimePi@n],1],{n,0,60}] (* _Giorgos Kalogeropoulos_, Sep 12 2021 *)
%Y Cf. A000040, A023360, A121303, A340961, A347739, A347740, A347741, A347743.
%K nonn
%O 0,6
%A _Ilya Gutkovskiy_, Sep 11 2021