A293723 E.g.f.: exp(x + 4*x^2 + 9*x^3 + 16*x^4).
1, 1, 9, 79, 841, 7821, 118681, 1782019, 28600209, 490277881, 9841912201, 200678086071, 4335000908569, 100095347642629, 2477069706227481, 63039923265570091, 1685240267891749921, 47330265699309738609, 1386300580285054314889
Offset: 0
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..461
Crossrefs
Column k=4 of A293724.
Programs
-
Mathematica
With[{nn=20},CoefficientList[Series[Exp[x+4x^2+9x^3+16x^4],{x,0,nn}],x] Range[0,nn]!] (* Harvey P. Dale, Feb 04 2019 *)
-
PARI
N=66; x='x+O('x^N); Vec(serlaplace(exp(x+4*x^2+9*x^3+16*x^4)))