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

37, 146, 327, 580, 905, 1302, 1771, 2312, 2925, 3610, 4367, 5196, 6097, 7070, 7238, 8115, 9232, 10421, 11682, 13015, 14420, 15897, 17446, 19067, 20760, 22525, 22826, 24362, 26271, 28252, 30305, 31001, 32430, 34627, 36896, 39237, 41650, 44135, 46692

Offset

1,1

Links

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

Mathematica

Select[Range[50000], !IntegerQ[Sqrt[#]] &&Min[ContinuedFraction[Sqrt[#]][[2]]] == 12&] (* Vincenzo Librandi, Feb 09 2012 *)

Crossrefs

Sequence in context: A158591 A262318 A262921 * A157324 A251113 A251106

Adjacent sequences: A031687 A031688 A031689 * A031691 A031692 A031693

Keyword

nonn

Author

David W. Wilson

Status

approved