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

1601, 6402, 14403, 25604, 40005, 57606, 78407, 102408, 129609, 160010, 193611, 230412, 270413, 313614, 360015, 409616, 462417, 518418, 577619, 640020, 705621, 774422, 846423, 921624, 1000025, 1081626, 1166427, 1254428, 1345629, 1440030

Offset

1,1

Links

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

Mathematica

cf80Q[n_]:=With[{s=Sqrt[n]}, If[IntegerQ[s], 1, Min[ContinuedFraction[s][[2]]]]==80]; Select[Range[ 1450000], cf80Q] (* Harvey P. Dale, Dec 03 2023 *)

Crossrefs

Sequence in context: A060566 A078853 A078958 * A154505 A031538 A202774

Adjacent sequences: A031755 A031756 A031757 * A031759 A031760 A031761

Keyword

nonn

Author

David W. Wilson

Status

approved