%I #13 Jul 10 2023 02:29:14
%S 2,7,2,1,0,5,8,3,1,8,3,0,5,8,2,8,1,1,0,5,7,4,3,8,0,8,6,7,3,6,6,2,8,7,
%T 5,1,0,8,4,6,1,3,0,0,0,6,5,5,5,1,8,6,2,1,1,0,8,5,6,8,3,1,8,9,9,6,1,7,
%U 7,1,7,5,4,5,4,8,0,4,0,3,1,8,3,6,8,7,6,7,8,2,2,9,1,6,3,2,4,5,5,1
%N Decimal expansion of arccos(-sqrt(5/6)).
%H G. C. Greubel, <a href="/A195726/b195726.txt">Table of n, a(n) for n = 1..10000</a>
%F Equals Pi - arcsin(sqrt(1/6)) = Pi - arctan(sqrt(1/5)). - _Amiram Eldar_, Jul 10 2023
%e arccos(-sqrt(5/6)) = 2.72105831830582...
%t r = Sqrt[5/6];
%t N[ArcCos[-r], 100]
%t RealDigits[%]
%o (PARI) acos(-sqrt(5/6)) \\ _G. C. Greubel_, Aug 20 2018
%o (Magma) SetDefaultRealField(RealField(100)); Arccos(-Sqrt(5/6)); // _G. C. Greubel_, Aug 20 2018
%Y Cf. A195725.
%K nonn,cons
%O 1,1
%A _Clark Kimberling_, Sep 23 2011
|