%I #8 Feb 27 2013 03:32:21
%S 1,2,3,3,3,5,1,9,0,4,0,0,1,8,9,3,4,2,9,1,4,8,9,8,9,2,0,7,9,8,3,6,6,4,
%T 2,2,6,1,6,0,7,6,2,9,3,3,9,8,4,5,1,2,5,5,1,1,1,2,1,8,8,2,5,6,0,4,5,3,
%U 0,8,2,9,9,6,8,5,5,4,0,0,6,4,8,0,3,8,7,0,4,2,9,2,9,6,7,5,0,8,9
%N Decimal expansion of least x>0 having (cos(x))^2+(sin(2x))^2=1/2.
%C For a discussion and guide to related sequences, see A197739.
%e x=1.2333519040018934291489892079836642261607...
%t (See the program at A197589.)
%t RealDigits[ ArcCos[ Sqrt[ (5Sqrt[17])/2 ]/2 ], 10, 99] // First (* _JeanFrançois Alcover_, Feb 27 2013 *)
%Y Cf. A197739, A197589.
%K nonn,cons
%O 1,2
%A _Clark Kimberling_, Oct 18 2011
