A031803 Period of continued fraction for sqrt(n) contains exactly 35 ones.

10339, 11911, 12667, 13303, 21691, 21823, 29419, 33835, 34435, 35947, 35995, 37503, 37631, 37855, 38383, 40391, 40504, 40843, 43927, 44243, 45719, 54279, 55615, 55651, 56563, 58651, 60875, 61387, 61439, 63891, 66679, 75544, 77224, 78376, 79119, 83295

Offset

1,1

Links

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

Mathematica

o35Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]==35]]; Select[Range[85000], o35Q] (* Harvey P. Dale, Sep 07 2017 *)

Crossrefs

Sequence in context: A178584 A144125 A097695 * A234907 A180460 A035912

Adjacent sequences: A031800 A031801 A031802 * A031804 A031805 A031806

Keyword

nonn

Author

David W. Wilson

Status

approved