
3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 9, 9, 9, 9, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 18, 18
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

2,1


COMMENTS

Also, least k such that k*log(n) exceeds n.  Amarnath Murthy, Jun 17 2004


LINKS

T. D. Noe, Table of n, a(n) for n = 2..10000


MATHEMATICA

Do[k = 1; While[k*Log[n] <= n, k++ ]; Print[k], {n, 2, 100}] (* Ryan Propper, Sep 17 2005 *)
Array[ Ceiling[#/Log@#] &, 80, 2] (* Robert G. Wilson v, Jan 15 2017 *)


CROSSREFS

See A050499 for more information.
Sequence in context: A289189 A134849 A096056 * A105590 A220845 A073750
Adjacent sequences: A050498 A050499 A050500 * A050502 A050503 A050504


KEYWORD

nonn


AUTHOR

N. J. A. Sloane, Dec 27 1999


EXTENSIONS

Edited by N. J. A. Sloane, Sep 15 2008 at the suggestion of R. J. Mathar


STATUS

approved

