A031700 - OEIS

%I #18 Jul 12 2021 02:04:02

%S 122,486,1092,1940,3030,4362,5936,7752,9810,12110,14652,17436,20462,

%T 23730,27240,30992,34986,39222,43700,48420,53382,58586,64032,69720,

%U 70248,75650,81822,88236,94892,101790,108930,116312,123936,131802,139910

%N Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 22.

%H Charles R Greathouse IV, <a href="/A031700/b031700.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Range[200000],!IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==22&] (* _Vincenzo Librandi_, Feb 06 2012 *)

%Y Cf. A031424.

%K nonn

%O 1,1

%A _David W. Wilson_