A031854 Period of continued fraction for sqrt(n) contains exactly 86 ones.

7606, 8269, 8941, 9619, 9811, 10021, 11251, 11404, 14629, 15261, 15292, 15649, 16894, 17047, 17497, 17659, 18313, 18789, 19156, 19387, 19582, 19606, 19837, 20092, 20509, 20641, 21553, 22303, 22521, 22567, 22609, 23251, 24121, 24406, 24686, 24913

Offset

1,1

Links

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

Mathematica

cf86Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]] == 86]; Select[Range[25000], cf86Q] (* Harvey P. Dale, Aug 01 2022 *)

Crossrefs

Sequence in context: A190077 A355119 A233881 * A253041 A068245 A189551

Adjacent sequences: A031851 A031852 A031853 * A031855 A031856 A031857

Keyword

nonn

Author

David W. Wilson

Status

approved