Problem 8. Use kstest() to decide whether the null hypothesis that variable hp in the mtcars data frame has an exponential distribution can be rejected with 95% confidence.

Remember to attach(mtcars)

Remember to use set.seed(1)

Then use ks.test(hp, rexp(100, rate = )) as a template for your test of whether hp and the best-fitting exponential distributions have significantly different CDFs

Plug the MLE value for rate (from your previous results from fitdist() for hp) into the above template

• What is the p-value for this hypothesis test?
• What should we conclude?

(Please input the p-value in the answer tab up to 5 decimal places)

________________________________________