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,3

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

Mathematica

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

Prog

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

Crossrefs

Sequence in context: A022568 A120006 A263847 * A293076 A293421 A018081

Adjacent sequences: A061564 A061565 A061566 * A061568 A061569 A061570

Keyword

easy,nonn

Author

Leroy Quet, May 18 2001

Status

approved