OFFSET
1,5
MATHEMATICA
Table[Floor[Log[Prime[n]]], {n, 80}] (* Alonso del Arte, Sep 11 2013 *)
PROG
(PARI) a(n) = floor(log(prime(n))); \\ Michel Marcus, Sep 11 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved