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

1, 2, 19, 346, 10217, 441226, 26023123, 1998840586, 193094418161, 22841006706928, 3239088790361491, 541309430523114804, 105106521730010262745, 23431755937256853296514, 5936989025261397848036755, 1694791457312643753292004446, 540937403928198054978670965089

Offset: 0

Author

Ilya Gutkovskiy, May 20 2019

Keywords

• nonn

Crossrefs

Cf. A063170, A292914, A308331, A321974.

Programs

Mathematica

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