A255969 E.g.f.: 1/Product_{k>=1} (1-x^k)^(x^k).

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

Vaclav Kotesovec, Table of n, a(n) for n = 0..440

Vaclav Kotesovec, Asymptotics of sequence A034691

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

Cf. A034691, A034899.

Sequence in context: A218002 A339058 A356565 * A329945 A239850 A354613

Adjacent sequences: A255966 A255967 A255968 * A255970 A255971 A255972

Keyword

nonn

Author

Vaclav Kotesovec, Mar 12 2015

Status

approved