A107236 Expansion of 1 / Product_{n>=0} (1 - q^(5n+1))*(1 - q^(5n+3))*(1 - q^(5n+4)).

1, 1, 1, 2, 3, 3, 5, 6, 8, 11, 13, 16, 22, 26, 32, 40, 49, 59, 73, 87, 105, 126, 151, 178, 214, 252, 297, 351, 413, 481, 566, 658, 767, 892, 1034, 1195, 1386, 1595, 1838, 2114, 2429, 2781, 3189, 3642, 4160, 4744, 5404, 6141, 6986, 7921, 8980

Offset

0,4

Links

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

Formula

a(n) ~ Pi^(3/5) * exp(Pi*sqrt(2*n/5)) / (Gamma(2/5) * 2^(4/5) * 5^(7/10) * n^(4/5)). - Vaclav Kotesovec, Jan 07 2021

Mathematica

nmax = 50; CoefficientList[Series[1/Product[(1 - x^(5*k+1))*(1 - x^(5*k+3))*(1 - x^(5*k+4)), {k, 0, nmax/5}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Jan 07 2021 *)

Crossrefs

Cf. A035959, A107234, A107235, A107237.

Sequence in context: A024503 A321286 A061790 * A192184 A027586 A339405

Adjacent sequences: A107233 A107234 A107235 * A107237 A107238 A107239

Keyword

nonn

Author

Ralf Stephan, May 13 2005

Status

approved