A170909 Denominators in Taylor series expansion of Product_{n >= 1} (1+x^n/n!).

1, 1, 2, 3, 24, 15, 360, 5040, 40320, 11340, 1814400, 39916800, 47900160, 6227020800, 7925299200, 1307674368000, 20922789888000, 11115232128000, 3201186852864000, 24329020081766400, 48658040163532800, 51090942171709440000, 1124000727777607680000, 5170403347776995328000

Offset: 0

Author

N. J. A. Sloane, Jan 30 2010

Keywords

• nonn
• frac

Examples

			1 + x + (1/2)*x^2 + (2/3)*x^3 + (5/24)*x^4 + (2/15)*x^5 + (41/360)*x^6 + (169/5040)*x^7 + ...
		

Links

• H. Gingold, H. W. Gould, and M. E. Mays, Power product expansions, Util. Math., 34 (1988), 143-161.

Crossrefs

Cf. A170908.

Programs

Mathematica

nmax=23; Denominator[CoefficientList[Series[Product[ (1+x^n/n!),{n,nmax}],{x,0,nmax}],x]] (* Stefano Spezia, Jun 24 2024 *)

Extensions

a(23) from Stefano Spezia, Jun 24 2024