cp's OEIS Frontend

A195628 Decimal expansion of arctan(4).

%I A195628 #24 Nov 20 2024 23:38:55
%S A195628 1,3,2,5,8,1,7,6,6,3,6,6,8,0,3,2,4,6,5,0,5,9,2,3,9,2,1,0,4,2,8,4,7,5,
%T A195628 6,3,1,1,8,4,4,4,0,6,0,1,3,0,6,3,6,8,8,4,3,3,6,0,0,9,6,3,8,1,4,8,6,5,
%U A195628 5,3,0,8,3,5,5,5,4,6,2,4,0,2,7,3,9,4,8,3,2,5,5,0,0,2,3,5,6,5,4,2
%N A195628 Decimal expansion of arctan(4).
%H A195628 G. C. Greubel, <a href="/A195628/b195628.txt">Table of n, a(n) for n = 1..10000</a>
%H A195628 <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>
%F A195628 Equals arcsin(4/sqrt(17)) = arccos(1/sqrt(17)). - _Amiram Eldar_, Jul 11 2023
%e A195628 arctan(4) = 1.3258176636680324650592392104284756311844406013...
%t A195628 r = 4;
%t A195628 N[ArcTan[r], 100]
%t A195628 RealDigits[%]  (* A195628 *)
%t A195628 N[ArcCot[r], 100]
%t A195628 RealDigits[%]  (* A195727 *)
%t A195628 N[ArcSec[r], 100]
%t A195628 RealDigits[%]  (* A195731 *)
%t A195628 N[ArcCsc[r], 100]
%t A195628 RealDigits[%]  (* A195621 *)
%o A195628 (Magma) SetDefaultRealField(RealField(125)); Arctan(4); // _G. C. Greubel_, Apr 13 2023
%o A195628 (SageMath) numerical_approx( arctan(4), digits=125) # _G. C. Greubel_, Apr 13 2023
%o A195628 (PARI) atan(4) \\ _Charles R Greathouse IV_, Nov 20 2024
%Y A195628 Cf. A195727, A195731, A195621.
%K A195628 nonn,cons
%O A195628 1,2
%A A195628 _Clark Kimberling_, Sep 23 2011