|
%I #21 Jul 30 2021 08:44:10
%S 83,328,735,1304,2035,2928,3983,5200,6579,7415,8120,9235,9823,11688,
%T 13715,15904,17190,18255,20768,23443,23750,26280,26605,29279,29622,
%U 31015,32440,35763,39248,42895,45416,46704,48890,50675,54808,59103
%N Least term in period of continued fraction for sqrt(n) is 9.
%H Charles R Greathouse IV, <a href="/A031433/b031433.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[60000],!IntegerQ[Sqrt[#]]&&Min[ContinuedFraction[Sqrt[#]][[2]]]==9&] (* _Vincenzo Librandi_, Jan 27 2012 *)
%K nonn
%O 1,1
%A _David W. Wilson_
%E References based on the incorrect a(n)=81n^2+2n removed by _R. J. Mathar_, Nov 18 2010
|
