OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..526
MAPLE
f := series(exp(-x^2 * exp(x)), x = 0, 101): 1, seq(factorial(n) * coeff(f, x^n), n = 1..100); # Muniru A Asiru, Oct 31 2017
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Exp[-x^2Exp[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Apr 21 2019 *)
PROG
(PARI) x='x+O('x^66); Vec(serlaplace(exp(-x^2*exp(x))))
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Sep 28 2017
STATUS
approved