|
%I #18 Sep 08 2022 08:44:44
%S 2,4,7,5,0,8,6,8,5,3,4,1,6,2,9,5,8,2,5,2,4,0,0,1,3,2,4,6,0,7,6,1,7,4,
%T 3,2,1,4,1,2,2,5,6,6,4,5,3,7,9,4,6,6,5,5,5,4,7,3,7,4,1,2,9,5,4,2,9,9,
%U 5,4,4,5,5,1,3,7,9,2,2,0,3,9,9,5,1,9,2,3,2,0,1,9,8,5,2,0,3,3,1
%N Decimal expansion of tangent of 68 degrees.
%C Also the decimal expansion of cotangent of 22 degrees. - _Ivan Panchenko_, Sep 01 2014
%H Ivan Panchenko, <a href="/A019966/b019966.txt">Table of n, a(n) for n = 1..1000</a>
%e 2.475086853416295825240013246076174321412256645379466555473741...
%t RealDigits[Tan[17*Pi/45], 10, 100][[1]] (* _G. C. Greubel_, Nov 21 2018 *)
%t RealDigits[Tan[68 Degree],10,120][[1]] (* _Harvey P. Dale_, Jun 02 2019 *)
%o (PARI) default(realprecision, 100); tan(17*Pi/45) \\ _G. C. Greubel_, Nov 21 2018
%o (Magma) SetDefaultRealField(RealField(100)); R:= RealField(); Tan(17*Pi(R)/45); // _G. C. Greubel_, Nov 21 2018
%o (Sage) numerical_approx(tan(17*pi/45), digits=100) # _G. C. Greubel_, Nov 21 2018
%Y Cf. A019877 (sine of 68 degrees).
%K nonn,cons
%O 1,1
%A _N. J. A. Sloane_
|
