Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #11 Sep 08 2022 08:44:44
%S 1,1,9,1,7,5,3,5,9,2,5,9,4,2,0,9,9,5,8,7,0,5,3,0,8,0,7,1,8,6,0,4,1,9,
%T 3,3,6,9,3,0,7,0,0,4,0,7,7,0,8,5,4,3,8,5,3,6,5,4,8,3,0,0,0,6,9,0,3,4,
%U 1,2,1,4,5,8,9,0,5,5,1,7,7,2,7,5,8,1,0,9,3,9,4,2,7,3,7,7,7,7,3
%N Decimal expansion of tangent of 50 degrees.
%C Also the decimal expansion of cotangent of 40 degrees. - _Ivan Panchenko_, Sep 01 2014
%H Ivan Panchenko, <a href="/A019948/b019948.txt">Table of n, a(n) for n = 1..1000</a>
%e 1.19175359259420995870530807186041933693070040770854385365483...
%t RealDigits[Tan[5*Pi/18], 10, 100][[1]] (* _G. C. Greubel_, Nov 23 2018 *)
%o (PARI) default(realprecision, 100); tan(5*Pi/18) \\ _G. C. Greubel_, Nov 23 2018
%o (Magma) SetDefaultRealField(RealField(100)); R:= RealField(); Tan(5*Pi(R)/18); // _G. C. Greubel_, Nov 23 2018
%o (Sage) numerical_approx(tan(5*pi/18), digits=100) # _G. C. Greubel_, Nov 23 2018
%Y Cf. A019859 (sine of 50 degrees).
%K nonn,cons
%O 1,3
%A _N. J. A. Sloane_