|
|
A000894
|
|
a(n) = (2*n)!*(2*n+1)! /((n+1)! *n!^3).
|
|
19
|
|
|
1, 6, 60, 700, 8820, 116424, 1585584, 22084920, 312869700, 4491418360, 65166397296, 953799087696, 14062422446800, 208618354980000, 3111393751416000, 46619049708716400, 701342468412012900
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
REFERENCES
|
E. R. Hansen, A Table of Series and Products, Prentice-Hall, Englewood Cliffs, NJ, 1975, p. 96.
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (EllipticK(4*x^(1/2)) - EllipticE(4*x^(1/2)))/(4*x*Pi). - Mark van Hoeij, Oct 24 2011
n*(n+1)*a(n) -4*(2*n-1)*(2*n+1)*a(n-1)=0. - R. J. Mathar, Sep 08 2013
0 = a(n)*(+65536*a(n+2) - 23040*a(n+3) + 1400*a(n+4)) + a(n+1)*(-1536*a(n+2) + 1184*a(n+3) - 90*a(n+4)) + a(n+2)*(-24*a(n+2) - 6*a(n+3) + a(n+4)) for all n in Z. - Michael Somos, May 28 2014
0 = a(n+1)^3 * (+256*a(n) - 6*a(n+1) + a(n+2)) + a(n) * a(n+1) * a(n+
2) * (-768*a(n) - 20*a(n+1) - 3*a(n+2)) + 90*a(n)^2*a(n+2)^2 for all n in Z. - Michael Somos, Sep 17 2014
|
|
EXAMPLE
|
G.f. = 1 + 6*x + 60*x^2 + 700*x^3 + 8820*x^4 + 116424*x^5 + ...
|
|
MAPLE
|
seq(binomial(2*n+1, n)*binomial(2*n, n), n=0..16); # Zerinvary Lajos, Jan 23 2007
|
|
MATHEMATICA
|
a[ n_] := Binomial[2 n + 1, n] Binomial[2 n, n]; (* Michael Somos, May 28 2014 *)
a[ n_] := SeriesCoefficient[ (EllipticK[ 16 x] - EllipticE[ 16 x]) / (4 x Pi), {x, 0, n}]; (* Michael Somos, May 28 2014 *)
Table[(2 n)!*(2 n + 1)!/((n + 1)!*n!^3), {n, 0, 16}] (* Michael De Vlieger, Sep 06 2016 *)
|
|
PROG
|
(Magma) [Factorial(2*n)*Factorial(2*n+1) /(Factorial(n+1)* Factorial(n)^3): n in [0..20]]; // Vincenzo Librandi, Oct 25 2011
(Haskell)
(PARI) {a(n) = binomial( 2*n + 1, n) * binomial( 2*n, n)}; /* Michael Somos, May 28 2014 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|