%I #20 Sep 08 2022 08:45:11
%S 4,8,0,8,2,2,7,6,1,2,6,3,8,3,7,7,1,4,1,5,9,8,9,5,2,6,4,6,0,4,5,7,9,9,
%T 9,6,3,0,5,9,9,4,5,1,6,9,3,6,1,9,9,5,5,2,7,1,6,9,0,8,6,2,2,1,3,6,7,3,
%U 5,2,8,2,3,1,4,5,2,5,2,3,6,0,7,4,5,8,2,3,4,9,4,4,3,7,3,4,1,0,3,2,5,8
%N Decimal expansion of 2*zeta(3)/5.
%D Alexander Apelblat, Tables of Integrals and Series, Harri Deutsch, (1996), 4.1.46.
%H G. C. Greubel, <a href="/A086468/b086468.txt">Table of n, a(n) for n = 0..10000</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/CentralBinomialCoefficient.html">Central Binomial Coefficient</a>
%F Equals Sum_{n>=1} (-1)^(n-1)/(n^3*binomial(2*n,n)).
%F Equals 2*A002117/5. - _R. J. Mathar_, Feb 08 2009
%e 0.48082...
%t First[RealDigits[N[2*Zeta[3]/5, 100]]] (* _Stefano Spezia_, Nov 02 2018 *)
%o (PARI) 2*zeta(3)/5 \\ _Michel Marcus_, Nov 02 2018
%o (Magma) SetDefaultRealField(RealField(250)); L:=RiemannZeta(); 2*Evaluate(L,3)/5; // _G. C. Greubel_, Nov 02 2018
%Y Cf. A086465, A086466, A086467.
%K nonn,cons
%O 0,1
%A _Eric W. Weisstein_, Jul 21 2003
|