A197592 - OEIS

%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[ (5-Sqrt[17])/2 ]/2 ], 10, 99] // First (* _Jean-François Alcover_, Feb 27 2013 *)

%Y Cf. A197739, A197589.

%K nonn,cons

%O 1,2

%A _Clark Kimberling_, Oct 18 2011