login
A255969
E.g.f.: 1/Product_{k>=1} (1-x^k)^(x^k).
1
1, 0, 2, 3, 44, 90, 2394, 6720, 202544, 1041768, 27369000, 170418600, 5835999432, 41711464080, 1489935696144, 14980499777880, 519279726915840, 5837621201012160, 232228922844775104, 2946339663605953920, 122979308145781345920, 1869847203939341074560
OFFSET
0,3
LINKS
FORMULA
log(a(n)) ~ 2*sqrt(n).
MATHEMATICA
nmax=20; CoefficientList[Series[Product[1/(1-x^k)^(x^k), {k, 1, nmax}], {x, 0, nmax}], x] * Range[0, nmax]!
nmax=20; CoefficientList[Series[Exp[Sum[1/(k*(1/x^(k+1)-1)), {k, 1, nmax}]], {x, 0, nmax}], x] * Range[0, nmax]!
CROSSREFS
Sequence in context: A218002 A339058 A356565 * A329945 A239850 A354613
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Mar 12 2015
STATUS
approved