OFFSET
0,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..410
FORMULA
a(n) = Sum_{k=0..n} Stirling2(n,k) * A015128(k) * k!.
a(n) ~ n! * exp(Pi^2 * (1 - log(2)) / (16*log(2)) + Pi * sqrt(n/(2*log(2)))) / (8*n*(log(2))^n).
MATHEMATICA
nmax = 20; CoefficientList[Series[Product[(1 + (Exp[x] - 1)^k) / (1 - (Exp[x] - 1)^k), {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Jun 18 2018
STATUS
approved