A020432 Numbers k such that the continued fraction for sqrt(k) has period 93.

4549, 5737, 6217, 7529, 8009, 8849, 10477, 12013, 14593, 14785, 14897, 16193, 17833, 18085, 18937, 18985, 19093, 19937, 20177, 21341, 22073, 22346, 23357, 26218, 26501, 29569, 31753, 32554, 35554, 37021, 38557, 38593, 41441, 41557, 42257, 44762, 47389

Offset

1,1

Links

Table of n, a(n) for n=1..37.

Mathematica

cf93Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Length[ ContinuedFraction[ s][[2]]]]==93]; Select[Range[50000], cf93Q] (* Harvey P. Dale, Jun 25 2017 *)

Crossrefs

Sequence in context: A307919 A031607 A193311 * A186471 A210305 A102748

Adjacent sequences: A020429 A020430 A020431 * A020433 A020434 A020435

Keyword

nonn

Author

David W. Wilson

Status

approved