OFFSET
1,18
FORMULA
G.f.: (Sum_{i>=1} x^prime(i)) * (Sum_{j>=1} x^(j^4)).
MATHEMATICA
nmax = 120; CoefficientList[Series[Sum[x^Prime[i], {i, 1, nmax}] Sum[x^j^4, {j, 1, nmax^(1/4)}], {x, 0, nmax}], x] // Rest
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Aug 24 2023
STATUS
approved