OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..6278
MATHEMATICA
CoefficientList[Series[Product[1/(1+Prime[k]x^Prime[k]), {k, 50}], {x, 0, 50}], x] (* Harvey P. Dale, Mar 24 2020 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Jan 14 2018
STATUS
approved