A293016
E.g.f.: exp(-x^2 * exp(x)).
Original entry on oeis.org
1, 0, -2, -6, 0, 100, 570, 798, -15176, -163368, -700650, 3112450, 84347868, 738909444, 1555721986, -54879912570, -955420939440, -7454556070352, 13202860260654, 1329363428217354, 20878556441998660, 145324350344133660, -1185240365741022822
Offset: 0
-
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
-
With[{nn=30},CoefficientList[Series[Exp[-x^2Exp[x]],{x,0,nn}],x] Range[ 0,nn]!] (* Harvey P. Dale, Apr 21 2019 *)
-
x='x+O('x^66); Vec(serlaplace(exp(-x^2*exp(x))))
A293017
E.g.f.: exp(-x^3 * exp(x)).
Original entry on oeis.org
1, 0, 0, -6, -24, -60, 240, 4830, 39984, 180936, -605520, -24616350, -318005160, -2385790836, -86488584, 350543790870, 6917020827360, 79778558317200, 357117438258144, -9237998478286134, -304182278908538040, -5166739059890655660, -48968796671246843160
Offset: 0
-
seq(k!*coeftayl(exp(-x^3*exp(x)), x = 0, k),k=0..30); # Muniru A Asiru, Oct 01 2017
-
With[{nn=30},CoefficientList[Series[Exp[-x^3Exp[x]],{x,0,nn}],x] Range[ 0,nn]!] (* Harvey P. Dale, Nov 04 2019 *)
-
x='x+O('x^66); Vec(serlaplace(exp(-x^3*exp(x))))
A293018
E.g.f.: exp(-x^4 * exp(x)).
Original entry on oeis.org
1, 0, 0, 0, -24, -120, -360, -840, 18480, 359856, 3623760, 26603280, 79821720, -2283258120, -61509151704, -964150419960, -10830864888480, -60512343148320, 1054627338811680, 45270062235647136, 995044394226238920, 15575041436469437160
Offset: 0
-
with(PolynomialTools):
seq(k!coeftayl(exp(-x^4*exp(x)), x = 0, k),k=0..50); # Muniru A Asiru, Oct 01 2017
-
x='x+O('x^66); Vec(serlaplace(exp(-x^4*exp(x))))
Showing 1-3 of 3 results.