login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

a(n) = floor(n^log(n)).
2

%I #18 Dec 12 2017 00:31:42

%S 1,1,3,6,13,24,44,75,124,200,314,480,719,1058,1530,2180,3062,4248,

%T 5823,7898,10605,14108,18607,24343,31607,40749,52184,66408,84009,

%U 105677,132226,164608,203936,251505,308815,377606,459883,557954,674470,812467

%N a(n) = floor(n^log(n)).

%C a(11) = 314 and 11^log(11) = 314.159789210968519210249138553976, which is close to 100*Pi, giving an approximate value Pi = 11^log(11)/100. - _Amarnath Murthy_, Jan 03 2002

%H Harry J. Smith, <a href="/A061567/b061567.txt">Table of n, a(n) for n = 1..500</a>

%t Array[Floor[#^Log[#]] &, 40] (* _Michael De Vlieger_, Dec 11 2017 *)

%o (PARI) { default(realprecision, 100); for (n=1, 500, write("b061567.txt", n, " ", floor(n^log(n))) ) } \\ _Harry J. Smith_, Jul 24 2009

%K easy,nonn

%O 1,3

%A _Leroy Quet_, May 18 2001