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

1, 0, 1, 1, 7, 11, 126, 267, 3655, 11503, 169258, 654413, 11623910, 52505961, 1066163983, 5721040860, 128827399823, 783999460951, 19881737827434, 134931439956945, 3784646604928402, 28564669112399283, 875600527787948801, 7239530824941958612, 242133074649322025674

Offset: 0

Author

Ilya Gutkovskiy, Mar 25 2024

Keywords

• nonn

Crossrefs

Cf. A005651, A032311.

Programs

Mathematica

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