A293717 E.g.f.: exp(x + 2*x^2 + 3*x^3 + 4*x^4).
1, 1, 5, 31, 241, 1661, 16861, 181315, 2091041, 25320601, 354057301, 5149373351, 78917379025, 1281478466581, 22335899616941, 403305062965771, 7612564457632321, 150561914023428785, 3113594618276542501, 66512360356769464111, 1474726318816689523121
Offset: 0
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..491
Crossrefs
Column k=4 of A293718.
Programs
-
Mathematica
With[{nn=20},CoefficientList[Series[Exp[x+2x^2+3x^3+4x^4],{x,0,nn}],x] Range[ 0,nn]!] (* Harvey P. Dale, Nov 15 2020 *)
-
PARI
N=66; x='x+O('x^N); Vec(serlaplace(exp(x+2*x^2+3*x^3+4*x^4)))