|
%I #10 Jun 05 2021 06:23:30
%S 1,4,0,5,6,4,7,6,4,9,3,8,0,2,6,9,7,8,0,9,5,2,1,9,3,4,0,1,9,9,5,8,0,7,
%T 9,8,8,1,0,0,1,9,8,0,3,9,2,2,2,5,2,5,0,9,1,4,6,9,4,3,7,8,6,6,1,4,2,7,
%U 6,2,5,4,0,9,6,3,2,9,9,3,5,7,8,3,9,1,3,0,2,7,4,7,7,2,3,5,8,4,2,6
%N Decimal expansion of arctan(6).
%F From _Amiram Eldar_, Jun 05 2021: (Start)
%F Equals Pi/2 - A195774.
%F Equals arcsin(6/sqrt(37)) = arccos(1/sqrt(37)) = arccot(1/6). (End)
%e arctan(6)=1.40564764938026978095219340199580798810...
%t r = 6;
%t N[ArcTan[r], 100]
%t RealDigits[%] (* A195773 *)
%t N[ArcCot[r], 100]
%t RealDigits[%] (* A195774 *)
%t N[ArcSec[r], 100]
%t RealDigits[%] (* A195775 *)
%t N[ArcCsc[r], 100]
%t RealDigits[%] (* A195776 *)
%Y Cf. A195774, A195775, A195776.
%K nonn,cons
%O 1,2
%A _Clark Kimberling_, Sep 24 2011
|
