A294494 E.g.f.: 1/Product_{k>0} (1+x^k/k!)^k.
1, -1, 0, -3, 26, -75, 324, -3535, 30988, -242025, 2245820, -26847381, 339741984, -4205748547, 57094691822, -883946426805, 14358210544304, -239959114870689, 4286519116236900, -82194727064059645, 1650577120959962440, -34495065863164195611
Offset: 0
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..449
Programs
-
Mathematica
With[{nn=30},CoefficientList[Series[1/Product[(1+x^k/k!)^k,{k,nn}],{x,0,nn}],x] Range[0,nn]!] (* Harvey P. Dale, May 12 2018 *) -
PARI
N=66; x='x+O('x^N); Vec(serlaplace(1/prod(k=1, N, (1+x^k/k!)^k)))