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

443, 1768, 3975, 7064, 11035, 15888, 21623, 28240, 35739, 44120, 53383, 63528, 74555, 86464, 99255, 112928, 127483, 142920, 159239, 176440, 194523, 204347, 213488, 224719, 233335, 254064, 275675, 298168, 321543, 345800, 370939, 396960

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A105980 A031519 A360827 * A158321 A293978 A345307

Adjacent sequences: A031696 A031697 A031698 * A031700 A031701 A031702

Keyword

nonn

Author

David W. Wilson

Status

approved