OFFSET
0,6
FORMULA
G.f.: series reversion of Sum(x^k for k in A008578) = x + Sum(x^n, n is prime).
EXAMPLE
x - x^2 + x^3 - 5*x^5 + 21*x^6 + ...
MATHEMATICA
With[{N = 10}, CoefficientList[InverseSeries[x + Sum[x^Prime[k], {k, 1, N}] + O[x]^(Prime[N + 1] - 1)], x]]
PROG
(PARI) t=Ser(x+O(x^31)); forprime(p=2, 30, t+=x^p); Vec(serreverse(t)) /* Max Alekseyev, Jul 15 2014 */
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Arsenii Abdrafikov, Jul 14 2014
STATUS
approved