OFFSET
0,3
FORMULA
a(n) = n! * [x^n] exp(1 + x - exp(n*x)).
a(n) = Sum_{k=0..n} binomial(n,k) * n^k * A000587(k).
MATHEMATICA
Table[Exp[1] Sum[(-1)^k (n k + 1)^n/k!, {k, 0, Infinity}], {n, 0, 17}]
Table[n! SeriesCoefficient[Exp[1 + x - Exp[n x]], {x, 0, n}], {n, 0, 17}]
Join[{1}, Table[Sum[Binomial[n, k] n^k BellB[k, -1], {k, 0, n}], {n, 1, 17}]]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Jun 24 2019
STATUS
approved