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.

A271236 G.f.: Product_{k>=1} 1/(1 - (9*x)^k)^(1/3).

Original entry on oeis.org

1, 3, 45, 450, 5805, 52326, 705591, 6190425, 77219325, 751178610, 8522919063, 80502824835, 975122402985, 8949951461925, 100088881882830, 1003346683458480, 10828622925516312, 104307212166072165, 1152197107898173875, 11048535008792967825, 119509353627934830327
Offset: 0

Views

Author

Vaclav Kotesovec, Apr 02 2016

Keywords

Comments

In general, for h>=1, if g.f. = Product_{k>=1} 1/(1-(h^2*x)^k)^(1/h), then a(n) ~ h^(2*n) * exp(Pi*sqrt(2*n/(3*h))) / (2^(5*h+3) * 3^(h+1) * h^(h+1) * n^(3*h+1))^(1/(4*h)).
This sequence is obtained from the generalized Euler transform in A266964 by taking f(n) = 1/3, g(n) = 9^n. - Seiichi Manyama, Apr 20 2018

Links

Crossrefs

Cf. A298994, A303074, A303130, A303152, A303342, A370735.
Expansion of Product_{n>=1} (1 - ((b^2)*x)^n)^(-1/b): A000041 (b=1), A271235 (b=2), this sequence (b=3), A303135 (b=4), A303136 (b=5).

Programs

  • Mathematica
    nmax = 30; CoefficientList[Series[Product[1/(1 - (9*x)^k)^(1/3), {k, 1, nmax}], {x, 0, nmax}], x]
  • PARI
    N=99; x='x+O('x^N); Vec(prod(k=1, N, 1/(1-(9*x)^k)^(1/3))) \\ Altug Alkan, Apr 20 2018

Formula

a(n) ~ 3^(2*n - 2/3) * exp(sqrt(2*n)*Pi/3) / (2^(3/2) * n^(5/6)).

A303131 Expansion of Product_{n>=1} (1 + (16*x)^n)^(-1/4).

Original entry on oeis.org

1, -4, -24, -1248, 1632, -267136, -669440, -56925184, 597165568, -19934894080, 61831327744, -3209599664128, 47593545383936, -840449808072704, 8113679782510592, -350055154021040128, 5703847053344768000, -57129722970675609600, 704939718429511778304
Offset: 0

Views

Author

Seiichi Manyama, Apr 19 2018

Keywords

Comments

This sequence is obtained from the generalized Euler transform in A266964 by taking f(n) = 1/4, g(n) = -16^n.

Links

Crossrefs

Expansion of Product_{n>=1} (1 + ((b^2)*x)^n)^(-1/b): A081362 (b=1), A298993 (b=2), A303130 (b=3), this sequence (b=4), A303132 (b=5).
Cf. A303124, A303135.

Programs

  • Mathematica
    CoefficientList[Series[(2/QPochhammer[-1, 16*x])^(1/4), {x, 0, 20}], x] (* Vaclav Kotesovec, Apr 20 2018 *)

Formula

a(n) ~ (-1)^n * exp(Pi*sqrt(n/24)) * 2^(4*n - 9/4) / (3^(1/4) * n^(3/4)). - Vaclav Kotesovec, Apr 20 2018

A303132 Expansion of Product_{n>=1} (1 + (25*x)^n)^(-1/5).

Original entry on oeis.org

1, -5, -50, -3875, 2500, -2046250, -12409375, -1087687500, 13232343750, -907225000000, 1545669140625, -362705679687500, 6007095839843750, -224713698632812500, 2118331116210937500, -226812683210205078125, 4765872641563720703125
Offset: 0

Views

Author

Seiichi Manyama, Apr 19 2018

Keywords

Comments

This sequence is obtained from the generalized Euler transform in A266964 by taking f(n) = 1/5, g(n) = -25^n.
In general, for h>=1, if g.f. = Product_{k>=1} (1 + (h^2*x)^k)^(-1/h), then a(n) ~ (-1)^n * exp(Pi*sqrt(n/(6*h))) * h^(2*n) / (2^(7/4) * 3^(1/4) * h^(1/4) * n^(3/4)). - Vaclav Kotesovec, Apr 20 2018

Links

Crossrefs

Expansion of Product_{n>=1} (1 + ((b^2)*x)^n)^(-1/b): A081362 (b=1), A298993 (b=2), A303130 (b=3), A303131 (b=4), this sequence (b=5).
Cf. A303125, A303136.

Programs

  • Mathematica
    CoefficientList[Series[(2/QPochhammer[-1, 25*x])^(1/5), {x, 0, 20}], x] (* Vaclav Kotesovec, Apr 20 2018 *)

Formula

a(n) ~ (-1)^n * exp(Pi*sqrt(n/30)) * 5^(2*n - 1/4) / (2^(7/4) * 3^(1/4) * n^(3/4)). - Vaclav Kotesovec, Apr 20 2018
Showing 1-3 of 3 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.