Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Aug 15 2015 15:18:44
%S 4,9,1,7,1,8,5,9,2,5,2,8,7,1,3,2,3,8,3,9,6,9,6,9,0,6,8,5,2,4,6,5,0,3,
%T 9,7,8,6,0,9,4,8,5,0,0,0,9,9,9,1,2,1,1,2,1,5,9,7,1,2,8,9,3,3,7,1,7,7,
%U 5,2,4,0,7,9,0,5,9,7,5,0,9,1,7,6,2,2,5,2,6,8,0,0,1,9,2,8,0,3,5,7,3,8,8,2,2
%N Decimal expansion of the smallest positive fixed point of sec(x).
%D Mohammad K. Azarian, On the Fixed Points of a Function and the Fixed Points of its Composite Functions, International Journal of Pure and Applied Mathematics, Vol. 46, No. 1, 2008, pp. 37-44. Mathematical Reviews, MR2433713 (2009c:65129), March 2009. Zentralblatt MATH, Zbl 1160.65015.
%D Mohammad K. Azarian, Fixed Points of a Quadratic Polynomial, Problem 841, College Mathematics Journal, Vol. 38, No. 1, January 2007, p. 60. Solution published in Vol. 39, No. 1, January 2008, pp. 66-67.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Secant.html">Secant</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/FixedPoint.html">Fixed Point</a>
%e 4.9171859252871323839...
%t RealDigits[ x /. FindRoot[ Sec[x] == x, {x, 5}, WorkingPrecision -> 105]][[1]] (* _Jean-François Alcover_, Oct 22 2012 *)
%K nonn,cons
%O 1,1
%A _Eric W. Weisstein_, Sep 27 2007