%I #18 Dec 27 2023 00:05:09
%S 23,1,2,5,1,1,2,2,2,1,1,5,2,1,46,1,2,5,1,1,2,2,2,1,1,5,2,1,46,1,2,5,1,
%T 1,2,2,2,1,1,5,2,1,46,1,2,5,1,1,2,2,2,1,1,5,2,1,46,1,2,5,1,1,2,2,2,1,
%U 1,5,2,1,46,1,2,5,1,1,2,2,2,1,1,5,2,1,46,1,2,5,1,1
%N Continued fraction for sqrt(561).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_14">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,0,0,0,0,0,0,0,0,1).
%p with(numtheory): Digits := 300: convert(evalf(sqrt(561)),confrac);
%t ContinuedFraction[Sqrt[561],100] (* or *) PadRight[{23},120,{46,1,2,5,1,1,2,2,2,1,1,5,2,1}] (* _Harvey P. Dale_, Sep 26 2017 *)
%K nonn,cofr,easy,less
%O 0,1
%A _N. J. A. Sloane_.