OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[110000], !IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==18&] (* Vincenzo Librandi, Jan 27 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved