%I #7 Dec 19 2015 09:51:47
%S 1,1,4,21,136,1045,9396,99379,1161952,14904873,208925380,3207759511,
%T 53349017184,950481426349,17959336305652,360094085423115,
%U 7656053670162496,172173524035504849,4077253037751090948,101263725993658291615,2627592803013505930240
%N E.g.f.: Product_{k>=1} (1 + exp(x)*x^k).
%H Vaclav Kotesovec, <a href="/A265952/b265952.txt">Table of n, a(n) for n = 0..440</a>
%t nmax=20; CoefficientList[Series[Product[(1+E^x*x^k), {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
%Y Cf. A265953.
%K nonn
%O 0,3
%A _Vaclav Kotesovec_, Dec 19 2015
|