|
|
A347798
|
|
Number of compositions (ordered partitions) of n into at most 5 nonprime parts.
|
|
4
|
|
|
1, 1, 1, 1, 2, 3, 4, 6, 10, 10, 19, 25, 29, 46, 50, 75, 103, 110, 162, 194, 240, 309, 368, 444, 565, 654, 795, 960, 1106, 1325, 1560, 1792, 2118, 2436, 2785, 3244, 3691, 4194, 4783, 5419, 6121, 6893, 7780, 8617, 9766, 10790, 12060, 13340, 14851, 16231, 18210
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,5
|
|
LINKS
|
Table of n, a(n) for n=0..50.
|
|
MATHEMATICA
|
Table[Length@Flatten[Permutations/@IntegerPartitions[n, 5, Select[Range@n, !PrimeQ@#&]], 1], {n, 0, 50}] (* Giorgos Kalogeropoulos, Sep 14 2021 *)
|
|
CROSSREFS
|
Cf. A018252, A052284, A341482, A347788, A347796, A347797, A347799.
Sequence in context: A339670 A353562 A347733 * A047417 A066936 A067027
Adjacent sequences: A347795 A347796 A347797 * A347799 A347800 A347801
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Ilya Gutkovskiy, Sep 14 2021
|
|
STATUS
|
approved
|
|
|
|