|
|
A031835
|
|
Period of continued fraction for sqrt(n) contains exactly 67 ones.
|
|
0
|
|
|
35011, 38191, 51671, 72479, 75763, 79864, 86395, 93991, 105283, 115768, 139855, 152447, 164728, 170704, 171856, 174479, 175195, 176287, 179219, 184507, 197467, 197723, 204179, 211479, 219064, 230231, 239992, 242755, 245391, 279827, 284959
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
cf67Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], False, Count[ ContinuedFraction[ s] [[2]], 1]==67]]; Select[Range[300000], cf67Q] (* Harvey P. Dale, Dec 17 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|