|
|
A031839
|
|
Period of continued fraction for sqrt(n) contains exactly 71 ones.
|
|
0
|
|
|
16039, 45571, 49051, 59911, 70375, 97219, 120143, 121903, 122931, 125623, 129667, 136024, 142091, 144664, 145867, 147431, 148391, 152056, 153064, 162403, 163903, 178551, 179767, 180583, 186359, 191287, 216143, 218023, 226615, 227971, 231835
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
cf71Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]]==71]; Select[Range[240000], cf71Q] (* Harvey P. Dale, Dec 26 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|