A285447 Expansion of Product_{k>=1} ((1 + x^(3*k)) / (1 - x^k))^k.

1, 1, 3, 7, 14, 27, 56, 101, 190, 347, 617, 1082, 1895, 3230, 5490, 9226, 15332, 25259, 41356, 67021, 107989, 172789, 274613, 433815, 681650, 1064661, 1654739, 2559029, 3938438, 6033967, 9205152, 13982675, 21156174, 31886290, 47879210, 71636483, 106814323

Offset

0,3

Links

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

Formula

a(n) ~ exp(1/12 + 2^(-4/3) * 3^(2/3) * (13*Zeta(3))^(1/3) * n^(2/3)) * (13*Zeta(3))^(7/36) / (A * 2^(7/9) * 3^(25/36) * sqrt(Pi) * n^(25/36)), where A is the Glaisher-Kinkelin constant A074962.

Mathematica

nmax = 40; CoefficientList[Series[Product[((1+x^(3*k))/(1-x^k))^k, {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A266648, A285446.

Cf. A156616, A285462, A285460, A285461.

Sequence in context: A359568 A029879 A018084 * A339655 A140741 A088209

Adjacent sequences: A285444 A285445 A285446 * A285448 A285449 A285450

Keyword

nonn

Author

Vaclav Kotesovec, Apr 19 2017

Status

approved