Use R language to solve:

Demonstrate that the sampling distribution of sample means of an exponential distribution(population) with lambda () = 5 is approximately normal (Central Limit Theorem) using a simulation. Use the sample size (n) of 50 and number of samples (k) of 1000. (20 points)

1. What is the real mean of the population?
2. What is the estimated mean of the population?
3. Plot the population distribution.
4. Plot the sample mean distribution

Upload the R code as well