|
| |
|
|
A010370
|
|
C(2*n,n)^2 / (1-2*n).
|
|
4
| |
|
|
1, -4, -12, -80, -700, -7056, -77616, -906048, -11042460, -139053200, -1796567344, -23696871744, -317933029232, -4326899214400, -59605244280000, -829705000377600, -11654762427179100, -165021757273414800, -2353088020380174000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| Expansion of hypergeometric function F(-1/2,1/2;1;16x).
Expansion of E(m)/(pi/2) in powers of m/16=(k/4)^2, where E(m) is complete elliptic integral of second kind evaluated at m. - Michael Somos, Mar 04 2003
|
|
|
REFERENCES
| M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 591.
J. M. Borwein and P. B. Borwein, Pi and the AGM, Wiley, 1987, p. 8.
|
|
|
LINKS
| M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
|
|
|
FORMULA
| a(n) ~ 1/2*pi^-1*n^-2*2^(4*n)
G.f.: F(-1/2, 1/2;1;16x) = E(16x)/(pi/2). a(n)=C(2*n, n)^2/(1-2*n). - Michael Somos, Mar 04 2003
E.g.f. Sum_{n>=0} a(n)*(x/2)^(2n)/(2n)! = I0^2*(1-2*x^2) +2*x*I0*I1 +2*x^2*I1^2 where I0=BesselI(0, x), I1=BesselI(1, x) . - Michael Somos Jun 22 2005
|
|
|
MATHEMATICA
| CoefficientList[Series[EllipticE[16x]2/Pi, {x, 0, 20}], x]
|
|
|
PROG
| (PARI) a(n)=if(n<0, 0, binomial(2*n, n)^2/(1-2*n))
|
|
|
CROSSREFS
| Cf. A002894, A002420. a(n)=-4*A000891(n-1), n>0.
Sequence in context: A078628 A165261 A027145 * A197852 A205337 A081214
Adjacent sequences: A010367 A010368 A010369 * A010371 A010372 A010373
|
|
|
KEYWORD
| sign,easy
|
|
|
AUTHOR
| Joe Keane (jgk(AT)jgk.org)
|
|
|
EXTENSIONS
| Additional comments from Michael Somos, Dec 13 2002
|
| |
|
|
