|
|
A300584
|
|
Number of partitions of n into distinct prime power parts (not including 1) that do not divide n.
|
|
3
|
|
|
1, 0, 0, 0, 0, 1, 0, 2, 1, 2, 1, 4, 1, 5, 2, 4, 3, 8, 2, 11, 4, 6, 6, 18, 3, 13, 10, 10, 8, 35, 7, 42, 9, 20, 24, 22, 10, 72, 33, 35, 11, 102, 21, 120, 29, 26, 65, 161, 16, 117, 56, 93, 52, 246, 43, 113, 36, 139, 160, 370, 39, 422, 208, 102, 62, 216, 110, 613, 145, 305, 130, 780, 57, 878
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,8
|
|
LINKS
|
|
|
EXAMPLE
|
a(9) = 2 because we have [7, 2] and [5, 4].
|
|
MATHEMATICA
|
Table[SeriesCoefficient[Product[(1 + Boole[Mod[n, k] != 0 && PrimePowerQ[k]] x^k), {k, 1, n}], {x, 0, n}], {n, 0, 73}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|