A195715 - OEIS

%I #13 Sep 08 2022 08:45:59

%S 2,4,8,7,6,6,4,7,1,1,0,8,9,5,6,9,8,7,2,1,4,8,5,0,4,0,9,0,8,2,8,2,6,0,

%T 2,4,8,4,0,5,7,4,8,9,8,9,7,3,7,1,8,4,2,4,1,3,8,9,9,1,3,2,0,4,4,0,8,5,

%U 0,5,0,3,4,7,4,2,4,8,2,6,9,6,4,2,1,0,1,4,9,9,1,5,1,1,2,6,8,6,9,9

%N Decimal expansion of arccos(-(1/2)^(1/3)).

%H G. C. Greubel, <a href="/A195715/b195715.txt">Table of n, a(n) for n = 1..10000</a>

%e arccos(-(1/2)^(1/3)) = 2.4876647110895...

%t r = (1/2)^(1/3);

%t N[ArcCos[-r], 100]

%t RealDigits[%]  (* A195715 *)

%t RealDigits[ArcCos[Surd[(-1/2),3]],10,120][[1]] (* _Harvey P. Dale_, Feb 22 2018 *)

%o (PARI) acos(-(1/2)^(1/3)) \\ _G. C. Greubel_, Aug 20 2018

%o (Magma) SetDefaultRealField(RealField(100)); Arccos(-(1/2)^(1/3)); // _G. C. Greubel_, Aug 20 2018

%Y Cf. A195712.

%K nonn,cons

%O 1,1

%A _Clark Kimberling_, Sep 23 2011