OFFSET
1,1
COMMENTS
Smallest term that is not squarefree is 8425, as sqrt(8425) = 5 * sqrt(337). - Alonso del Arte, Mar 10 2018
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..300
MATHEMATICA
cf57Q[n_] := Module[{s = Sqrt[n]}, If[IntegerQ[s], 1, Length[ContinuedFraction[s][[2]]]] == 57]; Select[Range[21000], cf57Q] (* Harvey P. Dale, Feb 12 2015 *)
Select[Range[30000], Length[Last[ContinuedFraction[Sqrt[#]]]] == 57 &] (* Vincenzo Librandi, Mar 11 2018, after Alonso del Arte *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved