estimate parameters of exponential distribution in r