A058751 a(n) = ceiling(log(n)*exp(n)).

0, 6, 23, 76, 239, 723, 2134, 6199, 17805, 50718, 143572, 404431, 1134768, 3173742, 8852664, 24637530, 68436135, 189781721, 525530245, 1453425034, 4015164095, 11081117799, 30554774842, 84183856048, 231774829750, 637705962869

Offset

1,2

Links

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

Mathematica

Table[Ceiling[Log[n]Exp[n]], {n, 30}] (* Harvey P. Dale, Aug 23 2013 *)

Prog

(PARI) { default(realprecision, 1000); for (n=1, 200, write("b058751.txt", n, " ", ceil(log(n)*exp(n))); ); } \\ Harry J. Smith, Jun 23 2009

Crossrefs

Sequence in context: A259033 A054459 A060188 * A034359 A220148 A114245

Adjacent sequences: A058748 A058749 A058750 * A058752 A058753 A058754

Keyword

nonn

Author

N. J. A. Sloane, Jan 01 2001

Status

approved