[go: up one dir, main page]
More Web Proxy on the site http://driver.im/
login
A031851
Period of continued fraction for sqrt(n) contains exactly 83 ones.
0
45151, 64375, 77059, 95371, 103375, 105403, 111619, 135679, 165911, 178003, 206579, 208079, 220183, 226255, 235279, 237771, 242719, 245311, 245699, 259319, 263887, 267448, 295399, 295447, 306448, 308339, 309283, 320379, 320407, 332279
OFFSET
1,1
MATHEMATICA
cf83Q[n_]:=Module[{s=Sqrt[n]}, !IntegerQ[s]&&Count[ContinuedFraction[s][[2]], 1]==83]; Select[Range[350000], cf83Q] (* Harvey P. Dale, Dec 31 2013 *)
CROSSREFS
Sequence in context: A295467 A158931 A162894 * A185927 A287378 A163816
KEYWORD
nonn
STATUS
approved