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
KEYWORD
nonn
AUTHOR
STATUS
approved