Plot[Log[z]/Log[E], {z, 0, 10}]