login
A031827
Period of continued fraction for sqrt(n) contains exactly 59 ones.
0
35959, 47239, 64519, 78547, 83224, 84019, 86227, 90119, 90799, 91999, 92335, 92583, 95951, 99415, 125095, 125291, 126451, 135875, 136144, 137171, 140215, 144232, 146771, 146971, 154963, 173227, 182771, 193543, 193855, 194035, 196547, 198211
OFFSET
1,1
MATHEMATICA
cf59Q[n_]:=Module[{s=Sqrt[n]}, !IntegerQ[s]&&Count[ContinuedFraction[s][[2]], 1]==59]; Select[Range[200000], cf59Q] (* Harvey P. Dale, Mar 16 2013 *)
CROSSREFS
Sequence in context: A216065 A236201 A034605 * A097694 A209956 A380850
KEYWORD
nonn
STATUS
approved