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

A211419 a(n) = (6*n)!*(2*n)!/((4*n)!*(3*n)!*n!).

Original entry on oeis.org

1, 10, 198, 4420, 104006, 2521260, 62300700, 1560167752, 39457579590, 1005490725148, 25776935824948, 664048851069240, 17175945353271068, 445775181599116600, 11602978540817349240, 302767701121286251920, 7917664916276259668550, 207452338901630123085180
Offset: 0

Views

Author

Peter Bala, Apr 10 2012

Keywords

Comments

This sequence is the particular case a = 3, b = 2 of the following result (see Bober, Theorem 1.2): Let a, b be nonnegative integers with a > b and gcd(a,b) = 1. Then (2*a*n)!*(b*n)!/((a*n)!*(2*b*n)!*((a-b)*n)!) is an integer for all integer n >= 0. Other cases include A061162 (a = 3, b = 1), A211420 (a = 4, b = 1), A211421 (a = 4, b = 3) and A061163 (a = 5, b = 1).
This is the case m = 3n in Catalan's formula (2m)!*(2n)!/(m!*(m+n)!*n!) - see Umberto Scarpis in References. - Bruno Berselli, Apr 27 2012
Sequence terms are given by the coefficient of x^n in the expansion of ((1 + x)^(k+2)/(1 - x)^k)^n when k = 4. See the cross references for related sequences obtained from other values of k. - Peter Bala, Sep 29 2015

References

  • Umberto Scarpis, Sui numeri primi e sui problemi dell'analisi indeterminata in Questioni riguardanti le matematiche elementari, Nicola Zanichelli Editore (1924-1927, third Edition), page 11.

Links

Crossrefs

Cf. A061162, A061163, A182400, A211420, A211421.
Cf. A000984 (k=0), A091527 (k=1), A001448 (k=2), A262732 (k=3), A262733 (k=5), A211421 (k=6), A262738.

Programs

  • Magma
    [Factorial(6*n) * Factorial(2*n) / (Factorial(4*n) * Factorial(3*n) * Factorial(n)): n in [0..20]]; // Vincenzo Librandi, May 03 2018
  • Maple
    A211419 := n-> (6*n)!*(2*n)!/((4*n)!*(3*n)!*n!):
seq(A211419(n), n=0..20);
# Using the o.g.f. from Karol A. Penson and Jean-Marie Maillard:
u := 27*x-1: c := (u^3*((3*x*u)^(1/2)*(12+81*x)-u^2+216*x-7))^(1/3):
gf := ((c^2-2*c*u+27*u*(7-81*x)*x-4*u)/(6*c*u^2))^(1/2):
ser := series(gf, x, 8); # Peter Luschny, May 03 2018
ogf := hypergeom([1/6, 1/2, 5/6], [1/4, 3/4], 27*z): ser := series(ogf, z, 20):
seq(coeff(ser, z, n), n = 0..17);  # Peter Luschny, Feb 22 2024
  • Mathematica
    Table[(6 n)!*(2 n)!/((4 n)!*(3 n)!*n!), {n, 0, 16}] (* Michael De Vlieger, Oct 04 2015 *)
CoefficientList[Series[Sqrt[(4 + 7290 x^2 - 59049 x^3 + 2 (8 + 3 Sqrt[3] Sqrt[x (-1 + 27 x)^7 (4 + 27 x)^2] - 27 x (-2 + 27 x) (-17 + 27 x (19 + 27 x (-11 + 27 x))))^(1/3) + (8 + 3 Sqrt[3] Sqrt[x (-1 + 27 x)^7 (4 + 27 x)^2] - 27 x (-2 + 27 x) (-17 + 27 x (19 + 27 x (-11 + 27 x))))^(2/3) - 27 x (11 + 2 (8 + 3 Sqrt[3] Sqrt[x (-1 + 27 x)^7 (4 + 27 x)^2] - 27 x (-2 + 27 x) (-17 + 27 x (19 + 27 x (-11 + 27 x))))^(1/3)))/(6 (1 - 27 x)^2 (8 + 3 Sqrt[3] Sqrt[x (-1 + 27 x)^7 (4 + 27 x)^2] - 27 x (-2 + 27 x) (-17 + 27 x (19 + 27 x (-11 + 27 x))))^(1/3))],{x,0,16}],x] (* Karol A. Penson and Jean-Marie Maillard, May 02 2018 *)
  • PARI
    a(n) = (6*n)!*(2*n)!/((4*n)!*(3*n)!*n!);
vector(30, n, a(n-1)) \\ Altug Alkan, Oct 02 2015

Formula

The o.g.f. Sum_{n >= 1} a(n)*z^n is algebraic over the field of rational functions Q(z) (see Rodriguez-Villegas).
From Peter Bala, Sep 29 2015: (Start)
a(n) = Sum_{i = 0..n} binomial(6*n, i) * binomial(5*n-i-1, n-i).
a(n) = [x^n] ( (1 + x)^6/(1 - x)^4 )^n.
O.g.f. exp( Sum_{n >= 1} a(n)*x^n/n ) = 1 + 10*x + 149*x^2 + 2630*x^3 + 51002*x^4 + ... has integer coefficients and equals 1/x * series reversion of x*(1 - x)^4/ (1 + x)^6. See A262738. (End)
a(n) ~ 27^n/sqrt(2*Pi*n). - Ilya Gutkovskiy, Jul 31 2016
O.g.f.: sqrt((4 + 7290*x^2 - 59049*x^3 + 2*(8 + 3*sqrt(3)*sqrt(x*(-1 + 27*x)^7*(4 + 27*x)^2) - 27*x*(-2 + 27*x)*(-17 + 27*x*(19 + 27*x*(-11 + 27*x))))^(1/3) + (8 + 3*sqrt(3)*sqrt(x*(-1 + 27*x)^7*(4 + 27*x)^2) - 27*x*(-2 + 27*x)*(-17 + 27*x*(19 + 27*x*(-11 + 27*x))))^(2/3) - 27*x*(11 + 2*(8 + 3*sqrt(3)*sqrt(x*(-1 + 27*x)^7*(4 + 27*x)^2) - 27*x*(-2 + 27*x)*(-17 + 27*x*(19 + 27*x*(-11 + 27*x))))^(1/3)))/(6*(1 - 27*x)^2*(8 + 3*sqrt(3)*sqrt(x*(-1 + 27*x)^7*(4 + 27*x)^2) - 27*x*(-2 + 27*x)*(-17 + 27*x*(19 + 27*x*(-11 + 27*x))))^(1/3))). - Karol A. Penson and Jean-Marie Maillard, May 02 2018
Right-hand side of the binomial sum identity: Sum_{k = 0..2*n} (-1)^(n+k) * binomial(6*n, 2*n+k) * binomial(2*n, k) = (6*n)!*(2*n)!/((4*n)!*(3*n)!*n!). - Peter Bala, Jan 19 2020
a(n) = 6*(6*n - 1)*(2*n - 1)*(6*n - 5)*a(n-1)/(n*(4*n - 1)*(4*n - 3)). - Neven Sajko, Jul 19 2023
From Peter Luschny, Feb 22 2024: (Start)
a(n) = 4^n*(Gamma(3*n + 1/2)/Gamma(2*n + 1/2))/Gamma(n + 1).
O.g.f.: hypergeom([1/6, 1/2, 5/6], [1/4, 3/4], 27*z). (End)
From Seiichi Manyama, Aug 09 2025: (Start)
a(n) = [x^n] 1/((1-x)^(n+1) * (1-2*x)^(4*n)).
a(n) = Sum_{k=0..n} 2^k * (-1)^(n-k) * binomial(6*n,k) * binomial(2*n-k,n-k).
a(n) = Sum_{k=0..n} 2^k * binomial(4*n+k-1,k) * binomial(2*n-k,n-k).
a(n) = 4^n * binomial((6*n-1)/2,n).
a(n) = [x^n] 1/(1-4*x)^((4*n+1)/2).
a(n) = [x^n] (1+4*x)^((6*n-1)/2). (End)

A262737 O.g.f. exp( Sum_{n >= 1} A262732(n)*x^n/n ).

Original entry on oeis.org

1, 8, 95, 1336, 20642, 338640, 5791291, 102108760, 1842857390, 33879118384, 632210693270, 11944142806064, 228010741228740, 4391334026631072, 85221618348230355, 1664901954576830360, 32716286416687895862, 646228961799752926320, 12823701194384778672322
Offset: 0

Views

Author

Peter Bala, Sep 29 2015

Keywords

Comments

O.g.f. is 1/x * the series reversion of x*(1 - x)^k/(1 + x)^(k+2) for k = 3. See the cross references for related sequences obtained from other values of k.

Links

Crossrefs

Cf. A000108 (k = 0), A007297 (k = 1), A066357 (k = 2), A262738 (k = 4), A262739 (k = 5), A262740 (k = 6), A262732.

Programs

  • Maple
    A262737 := proc (n) option remember; if n = 0 then 1 else add(1/k!*(5*k)!/GAMMA(5*k/2 + 1)*GAMMA(3*k/2 + 1)/(3*k)!*A262737(n-k), k = 1 .. n)/n end if; end proc:
seq(A262737(n), n = 0 .. 20);
  • PARI
    a(n) = sum(k=0, n, binomial(5*(n+1),k)*binomial(4*(n+1)-k-2,(n+1)-k-1))/(n+1); \\ Altug Alkan, Oct 03 2015

Formula

a(n-1) = 1/n * Sum_{i = 0..n-1} binomial(5*n,i)*binomial(4*n-i-2,n-i-1).
O.g.f.: A(x) = exp ( Sum_{n >= 1} 1/n! * (5*n)!/(5*n/2)! * (3*n/2)!/(3*n)!*x^n/n ) = 1 + 8*x + 195*x^2 + 1336*x^3 + ....
1 + x*A'(x)/A(x) is the o.g.f. for A262732.
O.g.f. is the series reversion of x*(1 - x)^3/(1 + x)^5.
a(0) = 1 and for n >= 1, a(n) = 1/n * Sum {k = 1..n} 1/k!*(5*k)!/GAMMA(5*k/2+1)*GAMMA(3*k/2+1)/(3*k)! * a(n-k).

A262739 O.g.f. exp( Sum_{n >= 1} A262733(n)*x^n/n ).

Original entry on oeis.org

1, 12, 215, 4564, 106442, 2635704, 68031147, 1810302340, 49308457334, 1368019979976, 38525145673126, 1098380420669000, 31641932951483220, 919622628946689648, 26931762975278938035, 793967020231145502564, 23543663463050594677310, 701763102761640853890600, 21014048069544552257072530, 631868353403527700756671320, 19070677448561228207945931276
Offset: 0

Views

Author

Peter Bala, Sep 29 2015

Keywords

Comments

O.g.f. is 1/x * the series reversion of x*(1 - x)^k/(1 + x)^(k+2) when k = 5. See the cross references for related sequences obtained from other values of k.

Links

Crossrefs

Cf. A262733, A211419, A000108 (k = 0), A007297 (k = 1), A066357 (k = 2), A262737 (k = 3), A262738 (k = 4), A262740 (k = 6).

Programs

  • Maple
    A262739 := proc (n) option remember; if n = 0 then 1 else add(1/k!*(7*k)!/GAMMA(7*k/2 + 1)*GAMMA(5*k/2 + 1)/(5*k)!*A262739(n-k), k = 1 .. n)/n end if; end proc:
seq(A262739(n), n = 0..20);
  • PARI
    a(n) = sum(k=0, n, binomial(7*(n+1),k)*binomial(6*(n+1)-k-2,(n+1)-k-1))/(n+1); \\ Altug Alkan, Oct 03 2015

Formula

a(n-1) = 1/n * Sum_{i = 0..n-1} binomial(7*n,i)*binomial(6*n-i-2,n-i-1).
O.g.f.: A(x) = exp ( Sum_{n >= 1} 1/n! * (7*n)!/(7*n/2)! * (5*n/2)!/(5*n)!*x^n/n ) = 1 + 12*x + 215*x^2 + 4564*x^3 + ....
1 + x*A'(x)/A(x) is the o.g.f. for A262733.
O.g.f. is the series reversion of x*(1 - x)^5/(1 + x)^7,
a(0) = 1 and for n >= 1, a(n) = 1/n * Sum {k = 1..n} 1/k! * (7*k)!/(7*k/2)! * (5*k/2)!/(5*k)!*a(n-k).

A262740 O.g.f. exp( Sum_{n >= 1} A211421(n)*x^n/n ).

Original entry on oeis.org

1, 14, 293, 7266, 197962, 5726364, 172662765, 5367187226, 170772853790, 5534640052292, 182070248073826, 6063785526898644, 204055962203476788, 6927718839334775608, 236994877398511998717, 8161492483543100398410, 282705062046649346154006, 9843330120848835962213940
Offset: 0

Views

Author

Peter Bala, Sep 29 2015

Keywords

Comments

O.g.f. is 1/x * the series reversion of x*(1 - x)^k/(1 + x)^(k+2) at k = 6. See the cross references for related sequences obtained from other values of k.

Links

Crossrefs

Cf. A211421, A000108 (k = 0), A007297 (k = 1), A066357 (k = 2), A262737 (k = 3), A262738 (k = 4), A262739 (k = 5).

Programs

  • Maple
    #A262740
A262740 := proc (n) option remember; if n = 0 then 1 else add(1/k!*(8*k)!/(4*k)!*(3*k)!/(6*k)!*A262740(n-k), k = 1 .. n)/n end if; end proc:
seq(A262740(n), n = 0..17);
  • PARI
    a(n) = sum(k=0, n, binomial(8*(n+1),k)*binomial(7*(n+1)-k-2,(n+1)-k-1))/(n+1); \\ Altug Alkan, Oct 03 2015

Formula

a(n-1) = 1/n * Sum_{i = 0..n-1} binomial(8*n,i)*binomial(7*n-i-2,n-i-1).
O.g.f.: A(x) = exp ( Sum_{n >= 1} 1/n! * (8*n)!/(4*n)! * (3*n)!/(6*n)!*x^n/n ) = 1 + 14*x + 293*x^2 + 7266*x^3 + ....
1 + x*A'(x)/A(x) is the o.g.f. for A211421.
O.g.f. is the series reversion of x*(1 - x)^6/(1 + x)^8.
a(0) = 1 and for n >= 1, a(n) = 1/n * Sum {k = 1..n} 1/k! * (8*k)!/(4*k)! * (3*k)!/(6*k)!*a(n-k).
Showing 1-4 of 4 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.