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

1683, 6728, 15135, 26904, 42035, 60528, 82383, 107600, 136179, 168120, 203423, 242088, 284115, 329504, 378255, 430368, 485843, 544680, 606879, 672440, 741363, 813648, 889295, 968304, 1050675, 1136408, 1225503, 1317960, 1413779, 1512960

Offset

1,1

Links

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

Mathematica

cf41Q[n_]:=With[{s=Sqrt[n]}, If[IntegerQ[s], 1, Min[ContinuedFraction[s][[2]]]]==41]; Select[Range[1513000], cf41Q] (* Harvey P. Dale, Oct 16 2025 *)

Crossrefs

Sequence in context: A107562 A031539 A205739 * A206671 A205515 A335338

Adjacent sequences: A031716 A031717 A031718 * A031720 A031721 A031722

Keyword

nonn

Author

David W. Wilson

Status

approved