A308331 a(n) = n! * [x^n] exp(exp(n*x)/(1 + x) - 1).

1, 0, 3, 50, 1449, 61724, 3608515, 275520972, 26505128433, 3125830471928, 442286373458691, 73789189395157730, 14309059313820886681, 3186711239965235356776, 806772967716453793227523, 230153293624841114893344854, 73420355768107554901016231265

Offset: 0

Author

Ilya Gutkovskiy, May 20 2019

Keywords

• nonn

Crossrefs

Cf. A134095, A292914, A308330, A321989.

Programs

Mathematica

Table[n! SeriesCoefficient[Exp[Exp[n x]/(1 + x) - 1], {x, 0, n}], {n, 0, 16}]