A371312 Expansion of e.g.f. Product_{k>=1} 1 / (1 - x^k/k!)^2.

1, 2, 8, 38, 228, 1562, 12386, 109286, 1073988, 11545994, 135393438, 1714890806, 23380747506, 341014477390, 5303722839850, 87582446980418, 1531259993710468, 28254163132485930, 548854481037814382, 11196310379931318758, 239346426732701009838, 5350768890908294837294

Offset

0,2

Comments

Exponential self-convolution of A005651.

Links

Table of n, a(n) for n=0..21.

Formula

a(n) = Sum_{k=0..n} binomial(n,k) * A005651(k) * A005651(n-k).

a(n) ~ A247551^2 * n! * n. - Vaclav Kotesovec, Mar 24 2024

Mathematica

nmax = 21; CoefficientList[Series[Product[1/(1 - x^k/k!)^2, {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!

Crossrefs

Cf. A005651, A032312.

Sequence in context: A275707 A058786 A096654 * A269509 A307725 A308205

Adjacent sequences: A371309 A371310 A371311 * A371313 A371314 A371315

Keyword

nonn

Author

Ilya Gutkovskiy, Mar 24 2024

Status

approved