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

82, 326, 732, 1300, 2030, 2922, 3976, 5192, 6570, 8110, 9812, 11676, 13702, 15890, 18240, 20752, 23426, 26262, 29260, 32420, 32780, 35742, 39226, 42872, 46680, 50650, 54782, 59076, 63532, 68150, 72930, 77872, 82976, 88242, 93670, 99260, 105012

Offset

1,1

Links

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

Mathematica

Select[Range[110000], !IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==18&] (* Vincenzo Librandi, Jan 27 2012 *)

Crossrefs

Sequence in context: A248405 A116341 A102956 * A005972 A082972 A288920

Adjacent sequences: A031693 A031694 A031695 * A031697 A031698 A031699

Keyword

nonn

Author

David W. Wilson

Status

approved