login
A031832
Period of continued fraction for sqrt(n) contains exactly 64 ones.
0
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
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
KEYWORD
nonn
STATUS
approved