A020421 Numbers k such that the continued fraction for sqrt(k) has period 82.

2164, 2614, 2641, 2644, 3067, 3397, 4468, 4723, 5059, 5062, 6106, 6249, 6937, 7021, 7291, 7499, 7654, 8243, 8434, 8516, 9206, 9307, 9361, 9561, 9569, 9694, 9777, 10053, 10173, 10349, 10469, 10677, 11133, 11171, 11241, 11416, 11845, 11860, 11899, 12219

Offset

1,1

Links

Table of n, a(n) for n=1..40.

Mathematica

cf82Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], False, Length[ ContinuedFraction[ s][[2]]]==82]]; Select[Range[13000], cf82Q] (* Harvey P. Dale, Dec 17 2013 *)

Crossrefs

Sequence in context: A035872 A126831 A161998 * A203736 A251067 A184558

Adjacent sequences: A020418 A020419 A020420 * A020422 A020423 A020424

Keyword

nonn

Author

David W. Wilson

Status

approved