|
|
A031859
|
|
Period of continued fraction for sqrt(n) contains exactly 91 ones.
|
|
0
|
|
|
64051, 75799, 76639, 85783, 129299, 132487, 146467, 148264, 151859, 162131, 162511, 192131, 214927, 223343, 224779, 224899, 250931, 251395, 262456, 273607, 289931, 292811, 316611, 318491, 331255, 343864, 345043, 346019, 347459, 353995
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
cf91Q[n_]:=Module[{sr=Sqrt[n], p}, p=If[IntegerQ[sr], 1, Count[ ContinuedFraction[ sr][[2]], 1]]; p==91]; Select[Range[400000], cf91Q] (* Harvey P. Dale, Jan 22 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|