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

Author

Vaclav Kotesovec, Mar 12 2015

Keywords

• nonn

Links

• Vaclav Kotesovec, Table of n, a(n) for n = 0..440
• Vaclav Kotesovec, Asymptotics of sequence A034691

Crossrefs

Cf. A034691, A034899.

Programs

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]!

Formula

log(a(n)) ~ 2*sqrt(n).