login
A170909
Denominators in Taylor series expansion of Product_{n >= 1} (1+x^n/n!).
3
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,3
LINKS
H. Gingold, H. W. Gould, and M. E. Mays, Power product expansions, Util. Math., 34 (1988), 143-161.
EXAMPLE
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 + ...
MATHEMATICA
nmax=23; Denominator[CoefficientList[Series[Product[ (1+x^n/n!), {n, nmax}], {x, 0, nmax}], x]] (* Stefano Spezia, Jun 24 2024 *)
CROSSREFS
Cf. A170908.
Sequence in context: A061098 A160630 A119619 * A160606 A099617 A092043
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, Jan 30 2010
EXTENSIONS
a(23) from Stefano Spezia, Jun 24 2024
STATUS
approved