|
%I #15 Apr 04 2023 22:55:10
%S 10000,7071,5773,5000,4472,4082,3779,3535,3333,3162,3015,2886,2773,
%T 2672,2581,2500,2425,2357,2294,2236,2182,2132,2085,2041,2000,1961,
%U 1924,1889,1856,1825,1796,1767,1740,1714,1690,1666,1643,1622,1601,1581,1561
%N a(n) = floor(10000/sqrt(n)).
%C First terms that are equal are a(310) = a(311) = 567. - _Robert Israel_, Mar 15 2018
%H Robert Israel, <a href="/A033433/b033433.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = 0 for n > 10^8. G.f. is a polynomial of degree 10^8. - _Robert Israel_, Mar 15 2018
%p seq(floor(10^4/sqrt(n)),n=1..100); # _Robert Israel_, Mar 15 2018
%t Table[Floor[10000/Sqrt[n]],{n,50}] (* _Harvey P. Dale_, Dec 20 2015 *)
%t Floor[10000/Sqrt[Range[60]]] (* _Wesley Ivan Hurt_, Apr 04 2023 *)
%o (Magma) [Floor(10000/Sqrt(n)): n in [1..60]]; // _Wesley Ivan Hurt_, Apr 04 2023
%K nonn,easy
%O 1,1
%A _Jeff Burch_
%E More terms from _Erich Friedman_
|
