A040321 - OEIS

%I #16 Dec 27 2023 00:01:54

%S 18,2,3,1,1,1,1,8,1,1,1,1,3,2,36,2,3,1,1,1,1,8,1,1,1,1,3,2,36,2,3,1,1,

%T 1,1,8,1,1,1,1,3,2,36,2,3,1,1,1,1,8,1,1,1,1,3,2,36,2,3,1,1,1,1,8,1,1,

%U 1,1,3,2,36,2,3,1,1,1,1,8,1,1,1,1,3,2,36,2,3,1,1,1

%N Continued fraction for sqrt(340).

%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(340)),confrac);

%t ContinuedFraction[Sqrt[340],120] (* or *) PadRight[{18},120,{36,2,3,1,1,1,1,8,1,1,1,1,3,2}] (* _Harvey P. Dale_, Jan 21 2019 *)

%K nonn,cofr,easy

%O 0,1

%A _N. J. A. Sloane_.