A020363 Numbers k such that the continued fraction for sqrt(k) has period 24.

271, 382, 581, 607, 681, 753, 789, 826, 871, 911, 1017, 1072, 1103, 1147, 1233, 1255, 1262, 1349, 1359, 1438, 1614, 1674, 1711, 1795, 1836, 1838, 1868, 1888, 1908, 1922, 1982, 2048, 2051, 2063, 2078, 2107, 2119, 2143, 2154, 2254, 2364, 2367, 2414, 2439

Offset

1,1

Links

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

Mathematica

cf24Q[n_]:=Module[{s=Sqrt[n], c}, c=If[IntegerQ[s], {1, 1}, ContinuedFraction[ s]][[2]]; Length[c]==24]; Select[Range[2500], cf24Q] (* Harvey P. Dale, Mar 20 2021 *)

Crossrefs

Sequence in context: A174402 A048295 A257210 * A051965 A142762 A141029

Adjacent sequences: A020360 A020361 A020362 * A020364 A020365 A020366

Keyword

nonn

Author

David W. Wilson

Status

approved