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

170, 678, 1524, 2708, 4230, 6090, 8288, 10824, 13698, 16910, 20460, 24348, 28574, 33138, 38040, 43280, 48858, 54774, 61028, 67620, 74550, 81818, 89424, 97368, 105650, 114270, 123228, 132524, 133252, 142158, 152130, 162440, 173088, 184074

Offset

1,1

Comments

(13*m)^2 + m for m >=1 are terms in the sequence (see comment in A031742). The first term not of this form is a(29) = 133252. - Chai Wah Wu, Jun 19 2016

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 60 terms from Vincenzo Librandi)

Mathematica

Select[Range[190000], !IntegerQ[Sqrt[#]] &&Min[ContinuedFraction[Sqrt[#]][[2]]] == 26&] (* Vincenzo Librandi, Feb 11 2012 *)

Crossrefs

Cf. A158000.

Sequence in context: A362561 A045089 A114078 * A173275 A301867 A281397

Adjacent sequences: A031701 A031702 A031703 * A031705 A031706 A031707

Keyword

nonn

Author

David W. Wilson

Status

approved