login
A020419
Numbers k such that the continued fraction for sqrt(k) has period 80.
0
1759, 1981, 2206, 2764, 2989, 3559, 3628, 3694, 3817, 3868, 3921, 4041, 4333, 5006, 5293, 5294, 5407, 5647, 5877, 6193, 6281, 6718, 6847, 6892, 7660, 8039, 8137, 8359, 8561, 8596, 9487, 9788, 9989, 10014, 10495, 10579, 10697, 10737, 10882, 11006
OFFSET
1,1
MATHEMATICA
Select[Range[2000], Length[ContinuedFraction[Sqrt[#]][[2]]] == 80 &] (* Alonso del Arte, Jun 23 2018 *)
CROSSREFS
Sequence in context: A213459 A186012 A031802 * A141287 A238050 A213804
KEYWORD
nonn
STATUS
approved