%I #11 Nov 15 2021 19:22:31
%S 25,1,6,2,2,3,1,9,1,1,2,1,12,4,1,1,1,1,1,16,1,1,1,1,1,4,12,1,2,1,1,9,
%T 1,3,2,2,6,1,50,1,6,2,2,3,1,9,1,1,2,1,12,4,1,1,1,1,1,16,1,1,1,1,1,4,
%U 12,1,2,1,1,9,1,3,2,2,6,1,50,1,6,2,2,3,1,9,1,1,2,1,12
%N Continued fraction for sqrt(669).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_38">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, 0, 0, 1).
%p with(numtheory): Digits := 300: convert(evalf(sqrt(669)),confrac);
%t ContinuedFraction[Sqrt[669],100] (* or *) PadRight[{25},100,{50,1,6,2,2,3,1,9,1,1,2,1,12,4,1,1,1,1,1,16,1,1,1,1,1,4,12,1,2,1,1,9,1,3,2,2,6,1}] (* _Harvey P. Dale_, Nov 15 2021 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.