login
A225541
Floor(W(n)) where W is the Lambert W function.
1
0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3
OFFSET
0,16
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 0..10000
FORMULA
a(n) = log n - log log n + O(1). - Charles R Greathouse IV, Dec 27 2013
MATHEMATICA
Table[Floor[ProductLog[n]], {n, 0, 100}]
PROG
(PARI) a(n)=lambertw(n)\1 \\ Charles R Greathouse IV, Dec 27 2013
CROSSREFS
Sequence in context: A102572 A098391 A071702 * A355480 A076303 A339276
KEYWORD
nonn
AUTHOR
STATUS
approved