%I #15 Sep 17 2016 00:22:49
%S 1,1,1,1,25,49,441,1089,184041,511225,5909761,17631601,863948449,
%T 2704312009,34493775625,111759833025,93990019574025,312541206957225,
%U 4201942893536025,14258670483605625,780804795682244025
%N a(n) = A002596(n)^2.
%C Numerator of h^(2n) in the Kummer-Gauss series for the perimeter of an ellipse.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Gauss-KummerSeries.html">Gauss-Kummer Series.</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Ellipse.html">Ellipse.</a>
%t Numerator[Table[Binomial[1/2, n]^2, {n, 50}]] (* _Artur Jasinski_, Aug 30 2016 *)
%Y Cf. A002596, A056982.
%K nonn,frac
%O 0,5
%A _Eric W. Weisstein_
%E New description from _N. J. A. Sloane_, Feb 18 2004
|