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,3

Links

Seiichi Manyama, Table of n, a(n) for n = 0..491

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 *)

Prog

(PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp(x+2*x^2+3*x^3+4*x^4)))

Crossrefs

Column k=4 of A293718.

Sequence in context: A069321 A211179 A177797 * A186859 A331335 A082579

Adjacent sequences: A293714 A293715 A293716 * A293718 A293719 A293720

Keyword

nonn

Author

Seiichi Manyama, Oct 15 2017

Status

approved