cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

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

Original entry on oeis.org

1, 2, 8, 24, 66, 176, 448, 1096, 2608, 6042, 13664, 30280, 65856, 140800, 296432, 615264, 1260306, 2550368, 5102616, 10101000, 19797344, 38439088, 73976160, 141179480, 267300752, 502283714, 937077808, 1736296304, 3196144032, 5846632656, 10631038400
Offset: 0

Views

Author

Vaclav Kotesovec, Aug 19 2015

Keywords

Comments

Convolution of A253289 and A255835.

Crossrefs

Programs

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

Formula

a(n) ~ 2^(1/3) * (7*Zeta(3))^(1/18) * exp(1/6 - Pi^4/(672*Zeta(3)) - Pi^2 * n^(1/3)/(4*(7*Zeta(3))^(1/3)) + 3/2*(7*Zeta(3))^(1/3) * n^(2/3)) / (A^2 * sqrt(3) * n^(5/9)), where Zeta(3) = A002117 and A = A074962 is the Glaisher-Kinkelin constant.

A005309 Fermionic string states.

Original entry on oeis.org

1, 0, 2, 4, 8, 16, 32, 60, 114, 212, 384, 692, 1232, 2160, 3760, 6480, 11056, 18728, 31474, 52492, 86976, 143176, 234224, 380988, 616288, 991624, 1587600, 2529560, 4011808, 6334656, 9960080, 15596532, 24327122, 37801568, 58525152, 90291232, 138825416
Offset: 0

Views

Author

Keywords

Comments

See the reference for precise definition.
The g.f. -(1-2*z+2*z**2)/(-1+2*z) conjectured by Simon Plouffe in his 1992 dissertation is not correct.

References

  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Formula

G.f. Product_{k>=1} ((1+x^k)/(1-x^k))^(k-1). - Vaclav Kotesovec, Aug 19 2015
Convolution of A052847 and A052812. - Vaclav Kotesovec, Aug 19 2015
a(n) ~ 2^(7/18) * (7*Zeta(3))^(1/36) * exp(1/12 - Pi^4/(336*Zeta(3)) - Pi^2 * n^(1/3) / (2^(5/3)*(7*Zeta(3))^(1/3)) + 3/2 * (7*Zeta(3)/2)^(1/3) * n^(2/3)) / (A * sqrt(3) * n^(19/36)), where Zeta(3) = A002117 and A = A074962 is the Glaisher-Kinkelin constant. - Vaclav Kotesovec, Aug 19 2015

A300412 a(n) = [x^n] Product_{k>=1} ((1 + n*x^k)/(1 - n*x^k))^k.

Original entry on oeis.org

1, 2, 16, 144, 1376, 15800, 210816, 3333372, 61688448, 1318588146, 32004369200, 869282342632, 26099925704928, 857736429098848, 30605729417479104, 1177841009504482200, 48614265201514729984, 2141639401723095243324, 100282931820560447963568, 4973060138191518242569120
Offset: 0

Views

Author

Ilya Gutkovskiy, Mar 05 2018

Keywords

Examples

			The table of coefficients of x^k in expansion of Product_{k>=1} ((1 + n*x^k)/(1 - n*x^k))^k begins:
n = 0: (1),  0,   0,    0,     0,       0,  ...
n = 1:  1,  (2),  6,   16,    38,      88,  ...
n = 2:  1,   4, (16),  60,   192,     596,  ...
n = 3:  1,   6,  30, (144),  582,    2280,  ...
n = 4:  1,   8,  48,  280, (1376),   6568,  ...
n = 5:  1,  10,  70,  480,  2790,  (15800), ...
		

Crossrefs

Programs

  • Mathematica
    Table[SeriesCoefficient[Product[((1 + n x^k)/(1 - n x^k))^k, {k, 1, n}], {x, 0, n}], {n, 0, 19}]

Formula

a(n) ~ 2 * n^n * (1 + 4/n + 14/n^2 + 44/n^3 + 124/n^4 + 328/n^5 + 824/n^6 + 1980/n^7 + 4590/n^8 + 10320/n^9 + 22584/n^10 + ...), for coefficients see A261451. - Vaclav Kotesovec, Mar 05 2018
Showing 1-3 of 3 results.