A031848 Period of continued fraction for sqrt(n) contains exactly 80 ones.

9244, 10531, 11014, 11569, 12094, 12721, 12889, 13822, 14236, 14548, 14851, 15289, 16969, 17383, 18556, 19717, 19828, 19846, 19867, 20841, 20899, 21247, 21249, 21769, 21901, 22807, 23227, 23281, 23461, 24014, 24109, 24441, 25759, 25873, 26647, 27046

Offset

1,1

Links

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

Mathematica

cf80Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]]==80]; Select[ Range[30000], cf80Q] (* Harvey P. Dale, Aug 06 2023 *)

Crossrefs

Sequence in context: A189984 A092005 A236512 * A184211 A035910 A202466

Adjacent sequences: A031845 A031846 A031847 * A031849 A031850 A031851

Keyword

nonn

Author

David W. Wilson

Status

approved