cp's OEIS Frontend

A195702 Decimal expansion of arccos(-sqrt(2/3)).

%I A195702 #17 Nov 21 2024 07:53:30
%S A195702 2,5,2,6,1,1,2,9,4,4,9,1,9,4,0,5,8,9,7,3,9,5,1,7,8,7,9,4,1,5,5,5,0,9,
%T A195702 1,9,6,3,4,1,9,9,9,3,9,4,6,9,7,5,5,8,4,0,1,4,4,7,1,7,0,4,2,5,4,7,5,8,
%U A195702 2,0,2,4,9,0,4,7,0,8,0,9,5,4,7,0,1,4,0,9,0,1,5,2,5,6,6,8,6,6,0,7
%N A195702 Decimal expansion of arccos(-sqrt(2/3)).
%H A195702 G. C. Greubel, <a href="/A195702/b195702.txt">Table of n, a(n) for n = 1..5000</a>
%H A195702 <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>
%F A195702 Equals Pi - arcsin(sqrt(1/3)) = Pi - arctan(sqrt(1/2)). - _Amiram Eldar_, Jul 10 2023
%e A195702 arccos(-sqrt(2/3)) = 2.5261129449405...
%t A195702 r = Sqrt[2/3];
%t A195702 N[ArcSin[r], 100]
%t A195702 RealDigits[%]  (* A195696 *)
%t A195702 N[ArcCos[r], 100]
%t A195702 RealDigits[%]  (* A195695 *)
%t A195702 N[ArcTan[r], 100]
%t A195702 RealDigits[%]  (* A195701 *)
%t A195702 N[ArcCos[-r], 100]
%t A195702 RealDigits[%]  (* A195702 *)
%t A195702 RealDigits[ArcCos[-Sqrt[(2/3)]],10,120][[1]] (* _Harvey P. Dale_, Jan 15 2013 *)
%o A195702 (PARI) acos(-sqrt(2/3)) \\ _G. C. Greubel_, Nov 18 2017
%o A195702 (Magma) [Arccos(-Sqrt(2/3))]; // _G. C. Greubel_, Nov 18 2017
%Y A195702 Cf. A195701.
%K A195702 nonn,cons
%O A195702 1,1
%A A195702 _Clark Kimberling_, Sep 23 2011