OFFSET
0,3
FORMULA
E.g.f.: 1/(1-log(g(x))), where g(x) is the e.g.f. for A006125.
MATHEMATICA
nn = 16; g[x_] := Sum[2^Binomial[n, 2] x^n/n!, {n, 0, nn}]; Table[n!, {n, 0, nn}] CoefficientList[Series[1/(1 - Log[g[x]]), {x, 0, nn}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Geoffrey Critzer, Jun 04 2020
STATUS
approved