A031832 Period of continued fraction for sqrt(n) contains exactly 64 ones.

6769, 6829, 7156, 7516, 8044, 8332, 8401, 8563, 8566, 9046, 9283, 9511, 9859, 10033, 10102, 10681, 10801, 10891, 10987, 11299, 11411, 11797, 11941, 12009, 12022, 12217, 12793, 13084, 13444, 13567, 13597, 13828, 13829, 14377, 15019, 15091, 15217, 15229

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Mathematica

cf64Q[n_]:=Module[{s=Sqrt[n]}, !IntegerQ[s]&&Count[ContinuedFraction[s][[2]], 1]==64]; Select[Range[16000], cf64Q] (* Harvey P. Dale, Mar 03 2013 *)

Crossrefs

Sequence in context: A147316 A206096 A238911 * A200436 A250332 A121106

Adjacent sequences: A031829 A031830 A031831 * A031833 A031834 A031835

Keyword

nonn

Author

David W. Wilson

Status

approved