OFFSET
1,4
COMMENTS
Inverse Moebius transform of A000607.
MATHEMATICA
nmax = 59; CoefficientList[Series[Sum[-1 + Product[1/(1 - x^(k Prime[j])), {j, 1, nmax}], {k, 1, nmax}], {x, 0, nmax}], x] // Rest
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Nov 13 2019
STATUS
approved