|
%I #19 Aug 07 2017 12:00:07
%S 17,66,147,260,405,582,791,1032,1305,1610,1690,1947,2316,2717,3150,
%T 3615,4112,4641,4778,5202,5795,6420,7077,7413,7766,8487,9240,10025,
%U 10842,11691,12572,13244,13485,14430,14671,15407,16416,16673,17457
%N Least term in period of continued fraction for sqrt(n) is 8.
%C 16*m^2 + m for m >= 1 are terms of this sequence (see comment in A031742). The first term that is not of this form is a(11) = 1690. - _Chai Wah Wu_, Jun 19 2016
%H Charles R Greathouse IV, <a href="/A031432/b031432.txt">Table of n, a(n) for n = 1..10000</a> (first 200 from Vincenzo Librandi)
%t Select[Range[20000],!IntegerQ[Sqrt[#]] && Min[ContinuedFraction[Sqrt[#]][[2]]] == 8&] (* _Vincenzo Librandi_, Feb 07 2012 *)
%K nonn
%O 1,1
%A _David W. Wilson_
|
