A020348 Numbers k such that the continued fraction for sqrt(k) has period 8.
31, 44, 69, 71, 91, 92, 108, 135, 153, 158, 160, 177, 188, 204, 205, 206, 207, 209, 234, 238, 279, 282, 316, 332, 348, 352, 378, 383, 384, 413, 414, 416, 423, 432, 450, 468, 476, 492, 503, 539, 540, 555, 585, 608, 612, 638, 658, 668, 684, 693, 695, 696, 704, 706, 707
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Vincenzo Librandi)
Programs
-
Mathematica
Select[Range[1000], Length[Last[ContinuedFraction[Sqrt[#]]]] == 8 &] (* Alonso del Arte, Mar 04 2018 *)