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

3251, 13000, 29247, 51992, 81235, 116976, 159215, 207952, 263187, 324920, 393151, 467880, 549107, 636832, 731055, 831776, 938995, 1052712, 1172927, 1299640, 1432851, 1572560, 1718767, 1871472, 2030675, 2196376, 2368575, 2547272, 2732467

Offset

1,1

Links

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

Mathematica

cf57Q[n_]:=Module[{s=Sqrt[n], cf}, cf=If[IntegerQ[s], {1}, Min[ ContinuedFraction[ s][[2]]]]==57]; Select[Range[274*10^4], cf57Q] (* Harvey P. Dale, Jul 21 2020 *)

Crossrefs

Sequence in context: A031555 A106723 A270799 * A144936 A164077 A183656

Adjacent sequences: A031732 A031733 A031734 * A031736 A031737 A031738

Keyword

nonn

Author

David W. Wilson

Status

approved