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-5 of 5 results.

A370016 Expansion of A(x) = [ Sum_{n>=0} 2^(n*(n-1)/2) * (1 + 2^(2*n+1))/3 * x^(n*(n+1)/2) ]^(1/3).

Original entry on oeis.org

1, 1, -1, 9, -18, 44, -54, 350, -1359, 3789, -9585, 42489, -163900, 543474, -1933092, 7499404, -27668718, 100329714, -371138346, 1394575578, -5236658316, 19587163968, -73536845444, 278088068628, -1052804678958, 3985553554074, -15132118280498, 57617112474306, -219680808219216
Offset: 0

Views

Author

Paul D. Hanna, Feb 22 2024

Keywords

Comments

Equals the self-convolution cube root of A370015.

Examples

			G.f.: A(x) = 1 + x - x^2 + 9*x^3 - 18*x^4 + 44*x^5 - 54*x^6 + 350*x^7 - 1359*x^8 + 3789*x^9 - 9585*x^10 + 42489*x^11 - 163900*x^12 + 543474*x^13 - 1933092*x^14 + 7499404*x^15 + ...
where the cube of g.f. A(x) yields the series
A(x)^3 = 1 + 3*x + 22*x^3 + 344*x^6 + 10944*x^10 + 699392*x^15 + 89489408*x^21 + 22907191296*x^28 + 11728213508096*x^36 + ... + 2^(n*(n-1)/2)*(1 + 2^(2*n+1))/3 * x^(n*(n+1)/2) + ...
The cube of g.f. A(x) also equals the infinite product
A(x)^3 = (1 + x)*(1 - 2*x)*(1 + 2^2*x) * (1 + 2*x^2)*(1 - 2^2*x^2)*(1 + 2^3*x^2) * (1 + 2^2*x^3)*(1 - 2^3*x^3)*(1 + 2^4*x^3) * (1 + 2^3*x^4)*(1 - 2^4*x^4)*(1 + 2^5*x^4) * ...
Equivalently,
A(x) = (1 + 3*x - 6*x^2 - 8*x^3)^(1/3) * (1 + 6*x^2 - 24*x^4 - 64*x^6)^(1/3) * (1 + 12*x^3 - 96*x^6 - 512*x^9)^(1/3) * (1 + 24*x^4 - 384*x^8 - 4096*x^12)^(1/3) * (1 + 48*x^5 - 1536*x^10 - 32768*x^15)^(1/3) * ...
where
(1 + 3*x - 6*x^2 - 8*x^3)^(1/3) = 1 + x - 3*x^2 + 3*x^3 - 12*x^4 + 30*x^5 - 102*x^6 + 318*x^7 - 1083*x^8 + 3657*x^9 + ... + A370145(n)*x^n + ...
		

Crossrefs

Programs

  • Mathematica
    Round[CoefficientList[Series[QPochhammer[-2, 2*x]^(1/3) * QPochhammer[-1/2, 2*x]^(1/3) * QPochhammer[2*x]^(1/3)*2^(1/3)/3^(2/3), {x, 0, 30}], x]] (* Vaclav Kotesovec, Feb 23 2024 *)
  • PARI
    {a(n) = my(A);
    A = prod(m=1, n+1, (1 + 2^(m-1)*x^m) * (1 - 2^m*x^m) * (1 + 2^(m+1)*x^m) +x*O(x^n))^(1/3);
    polcoeff(H=A, n)}
    for(n=0, 30, print1(a(n), ", "))

Formula

G.f. A(x) = Sum_{n>=0} a(n)*x^n satisfies the following formulas.
(1) A(x)^3 = Sum_{n>=0} 2^(n*(n-1)/2) * (1 + 2^(2*n+1))/3 * x^(n*(n+1)/2).
(2) A(x)^3 = Product_{n>=1} (1 + 2^(n-1)*x^n) * (1 - 2^n*x^n) * (1 + 2^(n+1)*x^n), by the Jacobi triple product identity.
(3) A(x) = Product_{n>=1} F( 2^(n-1)*x^n ), where F(x) = (1 + 3*x - 6*x^2 - 8*x^3)^(1/3).
a(n) ~ c * (-1)^(n+1) * 4^n / n^(4/3), where c = 0.260357663494676514371316... - Vaclav Kotesovec, Feb 23 2024
Radius of convergence r = 1/4 (from Vaclav Kotesovec's formula) and A(r) = ( Sum_{n>=0} (1/2^n + 2*2^n)/3 * 1/2^(n*(n+1)/2) )^(1/3) = ( Product_{n>=1} (1 + 1/2^n)*(1 - 1/4^(n+1)) )^(1/3) = 1.298389210904220681888354941631161162163... - Paul D. Hanna, Mar 07 2024

A370019 Expansion of [ Sum_{n>=0} (-4)^n * (2*4^n + 1)/3 * x^(n*(n+1)/2) ]^(1/3).

Original entry on oeis.org

1, -4, -16, -48, -384, -2816, -24384, -206336, -1815552, -16189440, -146777856, -1346648064, -12487131136, -116810932224, -1101080592384, -10447586845696, -99706199973888, -956400813293568, -9215587975397376, -89158545637244928, -865730439117078528, -8433936444598677504
Offset: 0

Views

Author

Paul D. Hanna, Feb 23 2024

Keywords

Comments

The self-convolution cube equals A370018.

Examples

			G.f.: A(x) = 1 - 4*x - 16*x^2 - 48*x^3 - 384*x^4 - 2816*x^5 - 24384*x^6 - 206336*x^7 - 1815552*x^8 - 16189440*x^9 - 146777856*x^10 + ...
RELATED SERIES.
The cube of the g.f. A(x) equals the g.f. A370018 which starts as
A(x)^3 = 1 - 12*x + 176*x^3 - 2752*x^6 + 43776*x^10 - 699392*x^15 + 11186176*x^21 + ... + (-4)^n * (2*4^n + 1)/3 * x^(n*(n+1)/2) + ...
The reciprocal of the g.f. A(x) equals the g.f. of A370044, which begins
1/A(x) = 1 + 4*x + 32*x^2 + 240*x^3 + 2048*x^4 + 17920*x^5 + 163904*x^6 + 1526784*x^7 + 14473216*x^8 + 138743808*x^9 + ... + A370044(n)*x^n + ...
		

Crossrefs

Programs

  • PARI
    {a(n) = my(A);
    A = sum(m=0, sqrtint(2*n+1), (-4)^m * (1 + 2*4^m)/3 * x^(m*(m+1)/2) +x*O(x^n))^(1/3);
    polcoeff(H=A, n)}
    for(n=0, 20, print1(a(n), ", "))

Formula

a(n) ~ c * d^n / n^(4/3), where d = 10.39336299855957350315151176284030870108168399888... and c = -0.218294054014127126766352511836393819909572679... - Vaclav Kotesovec, Feb 24 2024

A370148 Expansion of A(x) = [ Sum_{n>=0} (-7)^(n*(n-1)/2) * (1 + (-7)^(2*n+1))/(-6) * x^(n*(n+1)/2) ]^(1/3).

Original entry on oeis.org

1, 19, -361, 4896, -186048, 6361181, -265706784, 10569322565, -439680983904, 18480280546656, -790074277452000, 34174424338394976, -1494143747622128305, 65898152303725266336, -2928713377590693411552, 131019840536990930329051, -5895300394280706457304448, 266614701826937350737301056
Offset: 0

Views

Author

Paul D. Hanna, Feb 23 2024

Keywords

Examples

			G.f.: A(x) = 1 + 19*x - 361*x^2 + 4896*x^3 - 186048*x^4 + 6361181*x^5 - 265706784*x^6 + 10569322565*x^7 - 439680983904*x^8 + 18480280546656*x^9 + ...
The cube of g.f. A(x) equals the infinite product
A(x)^3 = (1 + x)*(1 + 7*x)*(1 + 7^2*x) * (1 - 7*x^2)*(1 - 7^2*x^2)*(1 - 7^3*x^2) * (1 + 7^2*x^3)*(1 + 7^3*x^3)*(1 + 7^4*x^3) * (1 - 7^3*x^4)*(1 - 7^4*x^4)*(1 - 7^5*x^4) * ...
Notice that the cube of A(x) yields the series
A(x)^3 = 1 + 57*x - 19607*x^3 - 47079151*x^6 + 791260232049*x^10 + 93090977300134793*x^15 - 76664422756665399911143*x^21 + ... + (-7)^(n*(n-1)/2)*(1 + (-7)^(2*n+1))/(-6) * x^(n*(n+1)/2) + ...
		

Crossrefs

Programs

  • PARI
    {a(n) = my(A);
    A = prod(m=1, n+1, (1 + (-7)^(m-1)*x^m) * (1 - (-7)^m*x^m) * (1 + (-7)^(m+1)*x^m) +x*O(x^n))^(1/3);
    polcoeff(H=A, n)}
    for(n=0, 30, print1(a(n), ", "))

Formula

G.f. A(x) = Sum_{n>=0} a(n)*x^n satisfies the following formulas.
(1) A(x)^3 = Sum_{n>=0} (-7)^(n*(n-1)/2) * (1 + (-7)^(2*n+1))/(-6) * x^(n*(n+1)/2).
(2) A(x)^3 = Product_{n>=1} (1 + (-7)^(n-1)*x^n) * (1 - (-7)^n*x^n) * (1 + (-7)^(n+1)*x^n), by the Jacobi triple product identity.
(3) A(x) = Product_{n>=1} F( 2^(n-1)*x^n ), where F(x) = (1 + 57*x + 399*x^2 + 343*x^3)^(1/3) which is the g.f. of A370147.
a(n) ~ (-1)^(n+1) * c * 7^(2*n) / n^(4/3), where c = 0.2168488573077459727164856825904737112... - Vaclav Kotesovec, Feb 24 2024

A370334 Expansion of [ Sum_{n>=0} 11^(n*(n-1)/2) * (1 + 11^(2*n+1))/12 * x^(n*(n+1)/2) ]^(1/3).

Original entry on oeis.org

1, 37, -1369, 133632, -9888768, 845367083, -78838949376, 7721334144755, -776624602305024, 79868229118115328, -8362877755373222400, 888226662691859185152, -95442299152209579505105, 10355840499178710443340288, -1132966823558169033184762368, 124832961812953439236127605357
Offset: 0

Views

Author

Paul D. Hanna, Feb 25 2024

Keywords

Examples

			G.f.: A(x) = 1 + 37*x - 1369*x^2 + 133632*x^3 - 9888768*x^4 + 845367083*x^5 - 78838949376*x^6 + 7721334144755*x^7 - 776624602305024*x^8 + ...
where the cube of g.f. A(x) yields the series
A(x)^3 = 1 + 111*x + 147631*x^3 + 2161452161*x^6 + 348104014265601*x^10 + 616687495357008127151*x^15 + 12017494675541950940487123311*x^21 + ... + 11^(n*(n-1)/2) * (1 + 11^(2*n+1))/12 * x^(n*(n+1)/2) + ...
The cube of g.f. A(x) also equals the infinite product
A(x)^3 = (1 + x)*(1 - 11*x)*(1 + 11^2*x) * (1 + 11*x^2)*(1 - 11^2*x^2)*(1 + 11^3*x^2) * (1 + 11^2*x^3)*(1 - 11^3*x^3)*(1 + 11^4*x^3) * (1 + 11^3*x^4)*(1 - 11^4*x^4)*(1 + 11^5*x^4) * ...
		

Crossrefs

Programs

  • PARI
    {a(n) = my(A); A = prod(m=1, n+1, (1 + 11^(m-1)*x^m) * (1 - 11^m*x^m) * (1 + 11^(m+1)*x^m) +x*O(x^n))^(1/3); polcoeff(H=A, n)}
    for(n=0, 30, print1(a(n), ", "))

Formula

G.f. A(x) = Sum_{n>=0} a(n)*x^n satisfies the following formulas.
(1) A(x)^3 = Sum_{n>=0} 11^(n*(n-1)/2) * (1 + 11^(2*n+1))/12 * x^(n*(n+1)/2).
(2) A(x)^3 = Product_{n>=1} (1 + 11^(n-1)*x^n) * (1 - 11^n*x^n) * (1 + 11^(n+1)*x^n), by the Jacobi triple product identity.
(3) A(x) = Product_{n>=1} F( 11^(n-1)*x^n ), where F(x) = (1 + 111*x - 1221*x^2 - 1331*x^3)^(1/3).
a(n) ~ (-1)^(n+1) * c * 11^(2*n) / n^(4/3), where c = 0.2588865455859866840901787578907966... - Vaclav Kotesovec, Feb 27 2024

A370335 Expansion of Sum_{n>=0} 5^n * (2*4^n + 1)/3 * x^(n*(n+1)/2).

Original entry on oeis.org

1, 15, 0, 275, 0, 0, 5375, 0, 0, 0, 106875, 0, 0, 0, 0, 2134375, 0, 0, 0, 0, 0, 42671875, 0, 0, 0, 0, 0, 0, 853359375, 0, 0, 0, 0, 0, 0, 0, 17066796875, 0, 0, 0, 0, 0, 0, 0, 0, 341333984375, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6826669921875, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 136533349609375
Offset: 0

Views

Author

Paul D. Hanna, Feb 23 2024

Keywords

Comments

Equals the self-convolution cube of A370336.

Examples

			G.f.: A(x) = 1 + 15*x + 275*x^3 + 5375*x^6 + 106875*x^10 + 2134375*x^15 + 42671875*x^21 + 853359375*x^28 + 17066796875*x^36 + 341333984375*x^45 + ...
RELATED SERIES.
The cube root of the g.f. A(x) is an integer series starting as
A(x)^(1/3) = 1 + 5*x - 25*x^2 + 300*x^3 - 3000*x^4 + 34375*x^5 - 426750*x^6 + 5539375*x^7 - 73968750*x^8 + 1010175000*x^9 + ... + A370336(n)*x^n + ...
		

Crossrefs

Cf. A370015.

Programs

  • PARI
    {a(n) = my(A);
    A = sum(m=0, sqrtint(2*n+1), 5^m*(2*4^m + 1)/3 * x^(m*(m+1)/2) +x*O(x^n));
    polcoeff(H=A, n)}
    for(n=0, 66, print1(a(n), ", "))
Showing 1-5 of 5 results.