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

2402, 9606, 21612, 38420, 60030, 86442, 117656, 153672, 194490, 240110, 290532, 345756, 405782, 470610, 540240, 614672, 693906, 777942, 866780, 960420, 1058862, 1162106, 1270152, 1383000, 1500650, 1623102, 1750356, 1882412, 2019270, 2160930

Offset

1,1

Links

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

Mathematica

lt98Q[n_]:=Module[{c=Sqrt[n]}, !IntegerQ[c]&&Min[ContinuedFraction[c][[2]]] == 98]; Select[Range[2200000], lt98Q] (* Harvey P. Dale, Dec 17 2012 *)

Crossrefs

Sequence in context: A222461 A013845 A352730 * A251774 A031547 A031727

Adjacent sequences: A031773 A031774 A031775 * A031777 A031778 A031779

Keyword

nonn

Author

David W. Wilson

Status

approved