A020362 Numbers k such that the continued fraction for sqrt(k) has period 23.

586, 634, 853, 1433, 1906, 1997, 2474, 2557, 2857, 2885, 2897, 3130, 3578, 3730, 4385, 4394, 4441, 4457, 5114, 5429, 5585, 6074, 6130, 6133, 6362, 6445, 6506, 6602, 7537, 7589, 7618, 7829, 7897, 8042, 8362, 8410, 8581, 9281, 9341, 9665, 9673, 9925, 10130

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

q[k_] := Module[{c = ContinuedFraction[Sqrt[k]]}, Length[c] == 2 && Length[c[[2]]] == 23]; Select[Range[11000], q] (* Amiram Eldar, Aug 22 2025 *)

Crossrefs

Sequence in context: A217446 A369861 A171436 * A051988 A261263 A251476

Adjacent sequences: A020359 A020360 A020361 * A020363 A020364 A020365

Keyword

nonn

Author

David W. Wilson

Status

approved