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

901, 3602, 8103, 14404, 22505, 32406, 44107, 57608, 72909, 90010, 108911, 129612, 152113, 176414, 202515, 230416, 260117, 291618, 324919, 360020, 396921, 435622, 476123, 518424, 562525, 608426, 656127, 705628, 756929, 810030, 864931, 921632

Offset

1,1

Comments

a(n) = 900n^2 + n for n < 63, but a(63) = 3463382. - Charles R Greathouse IV, Aug 04 2017

Links

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

Mathematica

upto=930000; With[{c=Complement[Range[upto], Range[Floor[Sqrt[ upto]]]^2]}, Select[ c, Min[ ContinuedFraction[Sqrt[#]][[2]]]==60&]] (* Harvey P. Dale, May 19 2012 *)

Crossrefs

Sequence in context: A252674 A158407 A250782 * A268585 A224611 A345537

Adjacent sequences: A031735 A031736 A031737 * A031739 A031740 A031741

Keyword

nonn

Author

David W. Wilson

Status

approved