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

1, 1, 3, 6, 13, 24, 44, 75, 124, 200, 314, 480, 719, 1058, 1530, 2180, 3062, 4248, 5823, 7898, 10605, 14108, 18607, 24343, 31607, 40749, 52184, 66408, 84009, 105677, 132226, 164608, 203936, 251505, 308815, 377606, 459883, 557954, 674470, 812467

Offset: 1

Author

Leroy Quet, May 18 2001

Keywords

• easy
• nonn

Comments

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

Links

• Harry J. Smith, Table of n, a(n) for n = 1..500

Programs

Mathematica

Array[Floor[#^Log[#]] &, 40] (* Michael De Vlieger, Dec 11 2017 *)

PARI

{ default(realprecision, 100); for (n=1, 500, write("b061567.txt", n, " ", floor(n^log(n))) ) } \\ Harry J. Smith, Jul 24 2009