|
%I #11 Oct 02 2021 13:49:11
%S 26,1,5,1,2,1,2,1,1,1,1,1,1,17,3,1,1,10,5,1,6,1,5,10,1,1,3,17,1,1,1,1,
%T 1,1,2,1,2,1,5,1,52,1,5,1,2,1,2,1,1,1,1,1,1,17,3,1,1,10,5,1,6,1,5,10,
%U 1,1,3,17,1,1,1,1,1,1,2,1,2,1,5,1,52,1,5,1,2,1,2,1,1
%N Continued fraction for sqrt(721).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_40">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, 0, 0, 1).
%p with(numtheory): Digits := 300: convert(evalf(sqrt(721)),confrac);
%t ContinuedFraction[Sqrt[721],100] (* or *) PadRight[{26},120,{52,1,5,1,2,1,2,1,1,1,1,1,1,17,3,1,1,10,5,1,6,1,5,10,1,1,3,17,1,1,1,1,1,1,2,1,2,1,5,1}] (* _Harvey P. Dale_, Oct 02 2021 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.
|
