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

227, 904, 2031, 3608, 5635, 8112, 11039, 14416, 18243, 22520, 27247, 32424, 38051, 44128, 50655, 54320, 57632, 62032, 65059, 72936, 81263, 90040, 99267, 108944, 119071, 124656, 129648, 140675, 152152, 164079, 176456, 189283, 190154, 202560

Offset

1,1

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 80 terms from Vincenzo Librandi)

Mathematica

Select[Range[210000], !IntegerQ[Sqrt[#]] &&Min[ContinuedFraction[Sqrt[#]][[2]]] == 15&] (* Vincenzo Librandi, Feb 10 2012 *)

Crossrefs

Sequence in context: A142390 A142219 A176012 * A158228 A349985 A209843

Adjacent sequences: A031690 A031691 A031692 * A031694 A031695 A031696

Keyword

nonn

Author

David W. Wilson

Status

approved