OFFSET
1,2
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..200
MATHEMATICA
Table[Floor[Log[n]Exp[n]], {n, 30}] (* Harvey P. Dale, Sep 20 2020 *)
PROG
(PARI) default(realprecision, 1000); for (n=1, 200, write("b058750.txt", n, " ", floor(log(n)*exp(n)))); \\ Harry J. Smith, Jun 23 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jan 01 2001
STATUS
approved