OFFSET
0,3
FORMULA
a(n) = n! * Sum_{i=0..n} (-1)^(n-i) * ( Sum_{j=0..n-i} i^j * Stirling2(n-i-j,j)/(n-i-j)! ).
MATHEMATICA
With[{nn=20}, CoefficientList[Series[1/(1-x Exp[-x(Exp[-x]-1)]), {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 27 2024 *)
PROG
(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(1/(1-x*exp(-x*(exp(-x)-1)))))
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Apr 12 2023
STATUS
approved