A031700 Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 22.
122, 486, 1092, 1940, 3030, 4362, 5936, 7752, 9810, 12110, 14652, 17436, 20462, 23730, 27240, 30992, 34986, 39222, 43700, 48420, 53382, 58586, 64032, 69720, 70248, 75650, 81822, 88236, 94892, 101790, 108930, 116312, 123936, 131802, 139910
Offset: 1
Keywords
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A031424.
Programs
-
Mathematica
Select[Range[200000],!IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==22&] (* Vincenzo Librandi, Feb 06 2012 *)