%I #11 Jul 22 2019 19:38:57
%S 28,2,10,1,8,1,1,2,1,1,1,3,6,18,1,4,1,2,1,27,1,2,1,4,1,18,6,3,1,1,1,2,
%T 1,1,8,1,10,2,56,2,10,1,8,1,1,2,1,1,1,3,6,18,1,4,1,2,1,27,1,2,1,4,1,
%U 18,6,3,1,1,1,2,1,1,8,1,10,2,56,2,10,1,8,1,1,2,1,1,1
%N Continued fraction for sqrt(811).
%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(811)),confrac);
%t ContinuedFraction[Sqrt[811],120] (* or *) PadRight[{28},120,{56,2,10,1,8,1,1,2,1,1,1,3,6,18,1,4,1,2,1,27,1,2,1,4,1,18,6,3,1,1,1,2,1,1,8,1,10,2}] (* _Harvey P. Dale_, Jul 22 2019 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.
|