A328128 G.f.: K(4*sqrt(x)) / E(4*sqrt(x)), where E(), K() are complete elliptic integrals.
1, 8, 80, 896, 10784, 136448, 1790720, 24160256, 333053504, 4670325248, 66403043840, 954931245056, 13863783325184, 202898094829568, 2989879597076480, 44320135356317696, 660370844304147584, 9884176356444627968, 148535796374189204480, 2240105752104228970496
Offset: 0
Keywords
Links
- Vaclav Kotesovec, Table of n, a(n) for n = 0..820
- Eric Weisstein's MathWorld, Complete Elliptic Integral of the First Kind.
- Eric Weisstein's MathWorld, Complete Elliptic Integral of the Second Kind.
Programs
-
Maple
seq(coeff(series(EllipticK(4*sqrt(x))/EllipticE(4*sqrt(x)), x, 21), x, n), n = 0..20);
-
Mathematica
CoefficientList[Series[EllipticK[16*x]/EllipticE[16*x], {x, 0, 20}], x]
Formula
a(n) ~ 2^(4*n-1) / n.
Comments