A031694 - OEIS

%I #16 Jul 15 2021 01:43:20

%S 65,258,579,1028,1605,2310,3143,4104,5193,6410,7755,9228,10829,12558,

%T 14415,16400,18513,20754,21042,23123,25620,28245,30998,33879,36888,

%U 40025,43290,46683,50204,53853,57630,61535,65568,69729,70258,74018,78435,82980

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

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

%t Select[Range[110000],!IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==16&] (* _Vincenzo Librandi_, Jan 27 2012 *)

%K nonn

%O 1,1

%A _David W. Wilson_