A031791 Period of continued fraction for sqrt(n) contains exactly 23 ones.

8791, 9211, 10287, 10579, 11368, 13031, 13603, 14039, 14151, 15544, 16287, 16799, 17719, 20099, 20711, 21971, 26555, 27512, 27599, 28103, 28187, 28783, 30439, 31659, 31672, 33431, 34427, 36087, 36419, 37051, 38656, 40183, 40991, 42552, 43259, 43360

Offset

1,1

Links

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

Mathematica

cf23Q[n_]:=Module[{s=Sqrt[n]}, !IntegerQ[s]&&Count[ ContinuedFraction[ s][[2]], 1]==23]; Select[Range[45000], cf23Q] (* Harvey P. Dale, Jun 19 2013 *)

Crossrefs

Sequence in context: A254840 A156083 A249956 * A179128 A206213 A270609

Adjacent sequences: A031788 A031789 A031790 * A031792 A031793 A031794

Keyword

nonn

Author

David W. Wilson

Status

approved