|
|
A031855
|
|
Period of continued fraction for sqrt(n) contains exactly 87 ones.
|
|
0
|
|
|
35179, 51811, 68083, 70723, 75499, 90331, 114211, 117907, 118003, 133651, 138919, 145147, 148231, 156811, 159127, 178471, 181451, 183847, 184471, 191875, 201379, 205099, 212711, 230887, 231016, 231295, 232211, 245335, 252407, 265631, 268087
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
cf87Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]]==87]; Select[Range[270000], cf87Q] (* Harvey P. Dale, Nov 26 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|