A031794 Period of continued fraction for sqrt(n) contains exactly 26 ones.

886, 919, 1006, 1039, 1141, 1153, 1291, 1471, 1699, 1801, 1837, 1951, 2131, 2167, 2239, 2347, 2449, 2539, 2692, 2977, 3011, 3189, 3457, 3499, 3546, 3557, 3561, 3693, 3727, 3742, 3789, 3793, 3911, 3929, 3991, 4197, 4273, 4306, 4351, 4426, 4526, 4529

Offset

1,1

Links

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

Mathematica

cf26Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]]==26]; Select[Range[4600], cf26Q] (* Harvey P. Dale, Aug 14 2018 *)

Crossrefs

Sequence in context: A318200 A295443 A261760 * A020393 A103811 A190354

Adjacent sequences: A031791 A031792 A031793 * A031795 A031796 A031797

Keyword

nonn

Author

David W. Wilson

Status

approved