A040532 - OEIS

%I #12 May 26 2019 10:56:01

%S 23,1,1,2,1,1,1,3,3,2,1,5,5,15,1,1,8,1,10,1,8,1,1,15,5,5,1,2,3,3,1,1,

%T 1,2,1,1,46,1,1,2,1,1,1,3,3,2,1,5,5,15,1,1,8,1,10,1,8,1,1,15,5,5,1,2,

%U 3,3,1,1,1,2,1,1,46,1,1,2,1,1,1,3,3,2,1,5,5,15,1,1,8

%N Continued fraction for sqrt(556).

%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>

%H <a href="/index/Rec#order_36">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).

%p with(numtheory): Digits := 300: convert(evalf(sqrt(556)),confrac);

%t ContinuedFraction[Sqrt[556],120] (* or *) PadRight[{23},120,{46,1,1,2,1,1,1,3,3,2,1,5,5,15,1,1,8,1,10,1,8,1,1,15,5,5,1,2,3,3,1,1,1,2,1,1}] (* _Harvey P. Dale_, May 26 2019 *)

%K nonn,cofr,easy,less

%O 0,1

%A _N. J. A. Sloane_.