A031807 Numbers k such that the period of the continued fraction for sqrt(k) contains exactly 39 ones.

13771, 21235, 24079, 25807, 27331, 31439, 32131, 40379, 46259, 46339, 48959, 49231, 53631, 53743, 58104, 58195, 58315, 59503, 62287, 62611, 65263, 65375, 69323, 70168, 70359, 74351, 78287, 78352, 83995, 84331, 85183, 94043, 97123, 98095, 98723

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

cf39Q[n_]:=With[{s=Sqrt[n]}, If[IntegerQ[s], 1, Count[ContinuedFraction[s][[2]], 1]]==39]; Select[Range[100000], cf39Q] (* Harvey P. Dale, Nov 04 2024 *)

Crossrefs

Sequence in context: A370503 A235184 A270639 * A119730 A204839 A208487

Adjacent sequences: A031804 A031805 A031806 * A031808 A031809 A031810

Keyword

nonn

Author

David W. Wilson

Status

approved