login
A320257
a(n) = [x^n] 1/(1 + Sum_{k>=1} k^n*x^k).
0
1, -1, -3, -12, 115, 10801, 513128, -31622305, -29139002795, -10674262825020, 8501486817673047, 49739414341982655313, 119603027548636893292304, -1457935338988787721752835601, -53309412371631686621966575526695, -722987647385617983636099803915844108
OFFSET
0,3
FORMULA
a(n) = [x^n] 1/(1 + PolyLog(-n,x)), where PolyLog() is the polylogarithm function.
MATHEMATICA
Table[SeriesCoefficient[1/(1 + Sum[k^n x^k, {k, 1, n}]), {x, 0, n}], {n, 0, 15}]
Table[SeriesCoefficient[1/(1 + PolyLog[-n, x]), {x, 0, n}], {n, 0, 15}]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Oct 08 2018
STATUS
approved