A031771 Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 93.

8651, 34600, 77847, 138392, 216235, 311376, 423815, 553552, 700587, 864920, 1046551, 1245480, 1461707, 1695232, 1946055, 2214176, 2499595, 2802312, 3122327, 3459640, 3814251, 4186160, 4575367, 4981872, 5405675, 5846776, 6305175, 6780872

Offset

1,1

Comments

(93*m)^2+2*m for m >= 1 is a proper subsequence. It is a subsequence (see comment in A031749) and the term 75620603 is not of this form. - Chai Wah Wu, Jun 19 2016

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Mathematica

cf93Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Min[ContinuedFraction[s][[2]]]] == 93]; Select[Range[6781000], cf93Q] (* Harvey P. Dale, Aug 08 2021 *)

Crossrefs

Sequence in context: A075006 A361796 A031591 * A205732 A205913 A205905

Adjacent sequences: A031768 A031769 A031770 * A031772 A031773 A031774

Keyword

nonn

Author

David W. Wilson

Status

approved