login
A245240
Coefficients of the series reversion of the series Sum(x^k for k in A008578).
0
0, 1, -1, 1, 0, -5, 21, -59, 117, -95, -484, 3131, -11219, 28216, -40975, -49778, 630853, -2758309, 8205948, -16014181, 3933569, 135111669, -743995720, 2566032656, -6105683945, 6584104436, 26402611080, -205994058892, 825490609412, -2295266373781
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
Sequence in context: A166464 A059859 A146617 * A370839 A203233 A112561
KEYWORD
sign,easy
AUTHOR
Arsenii Abdrafikov, Jul 14 2014
STATUS
approved