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

1, 4, 8, 12, 20, 36, 56, 80, 120, 180, 252, 348, 492, 680, 912, 1228, 1652, 2180, 2856, 3744, 4860, 6256, 8044, 10284, 13048, 16520, 20848, 26140, 32672, 40756, 50596, 62576, 77256, 95060, 116540, 142592, 174036, 211736, 257056, 311448, 376332, 453764, 546160

Offset

0,2

Links

Table of n, a(n) for n=0..42.

Formula

a(n) ~ exp(Pi*sqrt(2*n/3)) * Gamma(1/3)^2 / (2^(7/4) * 3^(5/12) * Pi^(4/3) * n^(7/12)).

Mathematica

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

Crossrefs

Cf. A015128, A156616, A080054, A007096, A261610, A261651.

Sequence in context: A322958 A123723 A279227 * A298797 A311664 A190891

Adjacent sequences: A261646 A261647 A261648 * A261650 A261651 A261652

Keyword

nonn

Author

Vaclav Kotesovec, Aug 28 2015

Status

approved