login
A050501
a(n) = ceiling(n/log(n)).
6
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
OFFSET
2,1
COMMENTS
Also, least k such that k*log(n) exceeds n. - Amarnath Murthy, Jun 17 2004
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 * A327469 A105590 A220845
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