A265952 E.g.f.: Product_{k>=1} (1 + exp(x)*x^k).

1, 1, 4, 21, 136, 1045, 9396, 99379, 1161952, 14904873, 208925380, 3207759511, 53349017184, 950481426349, 17959336305652, 360094085423115, 7656053670162496, 172173524035504849, 4077253037751090948, 101263725993658291615, 2627592803013505930240

Offset

0,3

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..440

Mathematica

nmax=20; CoefficientList[Series[Product[(1+E^x*x^k), {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!

Crossrefs

Cf. A265953.

Sequence in context: A288869 A052852 A288268 * A369784 A121124 A180399

Adjacent sequences: A265949 A265950 A265951 * A265953 A265954 A265955

Keyword

nonn

Author

Vaclav Kotesovec, Dec 19 2015

Status

approved