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