use power of 10 instead of exp in R examples