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

A364510 a(n) = binomial(4*n, n)^2.

Original entry on oeis.org

1, 16, 784, 48400, 3312400, 240374016, 18116083216, 1401950721600, 110634634890000, 8862957169158400, 718528370729238784, 58818762721626513424, 4853704694918904043024, 403242220875862752160000, 33694913171561404510440000, 2829611125043050701300998400
Offset: 0

Views

Author

Peter Bala, Jul 28 2023

Keywords

Crossrefs

Programs

  • Maple
    seq( binomial(4*n,n)^2, n = 0..15);
  • Mathematica
    A364510[n_]:=Binomial[4n,n]^2;Array[A364510,15,0] (* Paolo Xausa, Oct 05 2023 *)

Formula

a(n) = Sum_{i = -n..n} (-1)^i * binomial(2*n, n+i)^2 * binomial(4*n, 2*n+i).
Compare with Dixon's identity: Sum_{i = -n..n} (-1)^i * binomial(2*n, n+i)^3 = (3*n)!/n!^3.
a(n) = A005810(n)^2.
P-recursive: a(n) = 16 * ( (4*n - 1)*(4*n - 2)*(4*n - 3)/(3*n*(3*n - 1)*(3*n - 2)) )^2 * a(n-1) with a(0) = 1.
a(n) ~ c^n * 2/(3*Pi*n), where c = (2^16)/(3^6).
a(n) = [x^n] G(x)^(16*n), where the power series G(x) = 1 + x + 9*x^2 + 225*x^3 + 7525*x^4 + 295228*x^5 + 12787152*x^6 + 592477457*x^7 + 28827755219*x^8 + ... appears to have integer coefficients.
exp( Sum_{n > = 1} a(n)*x^n/n ) = F(x)^16, where the power series F(x) = 1 + x + 25*x^2 + 1033*x^3 + 53077*x^4 + 3081944*x^5 + 193543624*x^6 + 12835533333*x^7 + 886092805699*x^8 + ... appears to have integer coefficients.
The supercongruences a(n*p^r) == a(n*p^(r-1)) (mod p^(3^r)) hold for all primes p >= 5 and all positive integers n and r.
a(n) = [x^(3*n)] ( (1 - x)^(6*n)*Legendre_P(2*n, (1 + x)/(1 - x)) ). - Peter Bala, Aug 14 2023

A364511 a(n) = (6*n)!*(5*n)!*(2*n)! / ((4*n)!^2 * (3*n)! * n!^2).

Original entry on oeis.org

1, 50, 8910, 2011100, 503909070, 133954543800, 36992598142500, 10491379251679040, 3034472729231379150, 891028813210575018980, 264787855164104281785160, 79455812929030151249454000, 24035311050907120054564683300, 7320107028326385998504601648000
Offset: 0

Views

Author

Peter Bala, Jul 28 2023

Keywords

Comments

Row 4 of A364509.

Crossrefs

Programs

  • Maple
    seq((6*n)!*(5*n)!*(2*n)! / ((4*n)!^2 * (3*n)! * n!^2), n = 0..15);
  • Mathematica
    A364511[n_]:=(6n)!(5n)!(2n)!/((4n)!^2(3n)!n!^2);Array[A364511,15,0] (* Paolo Xausa, Oct 05 2023 *)

Formula

a(n) = Sum_{i = -n..n} (-1)^i * binomial(2*n, n+i)^2 * binomial(6*n, 3*n+i).
Compare with Dixon's identity: Sum_{i = -n..n} (-1)^i * binomial(2*n, n+i)^3 = (3*n)!/n!^3.
a(n) = (-1)^n*binomial(6*n,2*n) * hypergeom([-2*n, -2*n, -4*n], [1, 2*n+1], 1).
P-recursive: a(n) = (15/4)*(5*n-1)*(5*n-2)*(5*n-3)*(5*n-4)*(6*n-1)*(6*n-5)/((4*n-1)^2*(4*n-3)^2*n^2) * a(n-1) with a(0) = 1.
a(n) ~ c^n * sqrt(5)/(4*Pi*n), where c = (3^3)*(5^5)/(2^8).
a(n) = [x^n] G(x)^(10*n), where the power series G(x) = 1 + 5*x + 208*x^2 + 19960*x^3 + 2580710*x^4 + 390721786*x^5 + 65243160516*x^6 + 11646611942100*x^7 + 2182248792056787*x^8 + ... appears to have integer coefficients.
exp( Sum_{n > = 1} a(n)*x^n/n ) = F(x)^10, where the power series F(x) = 1 + 5*x + 458*x^2 + 69285*x^3 + 13037740*x^4 + 2773287786*x^5 + 638122182196*x^6 + 155077758079485*x^7 + 39234250338228617*x^8 + ... appears to have integer coefficients.
Conjecture: the supercongruences a(n*p^r) == a(n*p^(r-1)) (mod p^(3^r)) hold for all primes p >= 5 and all positive integers n and r [added Oct 11 2024: follows from Meštrović, Section 6, equation 39, since a(n) = binomial(6*n, 3*n)*binomial(5*n, n)* binomial(2*n, n)/binomial(4*n, n)].
a(n) = (-1)^n * [x^(4*n)] (1 - x)^(8*n)*Legendre_P(2*n, (1 + x)/(1 - x)). - Peter Bala, Aug 14 2023
Showing 1-2 of 2 results.