OFFSET
0,3
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..235
FORMULA
a(n) = Sum_{k=0..n} Stirling1(n,k)*k!*k^n.
a(n) ~ c * d^n * n^(2*n + 1/2), where d = 0.298212940253960977992575968955431001807757948758929... and c = 3.40415549717199390989204785905061856492539214306... - Vaclav Kotesovec, Oct 05 2018
MAPLE
1, seq(n!*coeff(series(add( log(1 + k*x)^k, k=1..100), x=0, 18), x, n), n=1..17); # Paolo P. Lava, Jan 09 2019
MATHEMATICA
nmax = 17; CoefficientList[Series[1 + Sum[Log[1 + k x]^k, {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
Join[{1}, Table[Sum[StirlingS1[n, k] k! k^n, {k, n}], {n, 17}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Oct 05 2018
STATUS
approved