login
A031431
Least term in period of continued fraction for sqrt(n) is 7.
1
51, 200, 447, 792, 1235, 1776, 2415, 2824, 3152, 3736, 3987, 4920, 5951, 6584, 7080, 8307, 8490, 9632, 9829, 11055, 11266, 11912, 12576, 14195, 15411, 15912, 17727, 18808, 19640, 21651, 22243, 23760, 25967, 27272, 27936, 28272, 30675
OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 200 from Vincenzo Librandi)
MATHEMATICA
Select[Range[35000], !IntegerQ[Sqrt[#]] && Min[ContinuedFraction[Sqrt[#]][[2]]] == 7&] (* Vincenzo Librandi, Feb 07 2012 *)
CROSSREFS
Sequence in context: A069762 A245829 A369922 * A157365 A157916 A007264
KEYWORD
nonn
STATUS
approved