A031760 Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 82.

1682, 6726, 15132, 26900, 42030, 60522, 82376, 107592, 136170, 168110, 203412, 242076, 284102, 329490, 378240, 430352, 485826, 544662, 606860, 672420, 741342, 813626, 889272, 968280, 1050650, 1136382, 1225476, 1317932, 1413750, 1512930

Offset

1,1

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Mathematica

cf82Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Min[ ContinuedFraction[ s] [[2]]]]==82]; Select[Range[16*10^5], cf82Q] (* Harvey P. Dale, Jan 17 2016 *)

Crossrefs

Sequence in context: A163009 A069331 A156175 * A204568 A035766 A107562

Adjacent sequences: A031757 A031758 A031759 * A031761 A031762 A031763

Keyword

nonn

Author

David W. Wilson

Status

approved