|
%I #25 Jul 12 2021 02:04:06
%S 123,488,1095,1944,3035,4368,5943,7760,9819,12120,14663,16152,17448,
%T 19344,20475,23744,27255,31008,35003,37284,39240,43719,48440,53403,
%U 53866,58608,59093,64055,64562,67128,69744,75675,81848,88263,94920,101819
%N Numbers k such that the least term in the periodic part of the continued fraction for sqrt(k) is 11.
%H Charles R Greathouse IV, <a href="/A031689/b031689.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[110000],!IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==11&] (* _Vincenzo Librandi_, Jan 27 2012 *)
%Y Cf. A031424.
%K nonn
%O 1,1
%A _David W. Wilson_
%E Content that was based on the incorrect assumption that a(n)=121*n^2+2*n removed by _R. J. Mathar_, Nov 18 2010
|
