A020376 Numbers k such that the continued fraction for sqrt(k) has period 37.

421, 769, 1409, 1481, 2237, 2609, 2977, 3109, 3194, 3257, 3301, 3517, 4282, 5617, 6154, 6637, 7474, 8573, 8770, 9181, 9685, 9893, 9965, 10042, 10085, 10949, 11674, 12185, 12301, 12473, 12658, 12953, 13061, 13697, 13885, 15025, 15146, 15889, 16042

Offset

1,1

Links

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

Mathematica

cf37Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Length[ ContinuedFraction[ s][[2]]]]==37]; Select[Range[17000], cf37Q] (* Harvey P. Dale, Jan 03 2019 *)

Crossrefs

Cf. A003285.

Sequence in context: A333640 A146358 A050962 * A023353 A142853 A217587

Adjacent sequences: A020373 A020374 A020375 * A020377 A020378 A020379

Keyword

nonn

Author

David W. Wilson

Status

approved