Consider the data below:

33.1068240, -6.3331469, 22.2903011, -6.9142991, -21.7899524, -12.1741625, 29.2973275, -34.2364631, -4.4113930, -25.7845033, -12.0375226, 17.9397860, -6.2030667, 0.3504070 , -19.4854146, -10.5979710, -27.1274107, 20.4247578, 17.0975034, -6.8416016, 0.8700698, -9.9103781, 8.3101956, -6.9263659, -23.7861226, -1.8070511, 8.9497832, 27.5315404, 5.9680535, -2.4057959, 30.4888656, 8.3810280, -12.4548588, -19.5759143

a. Write an R-script to estimate the sampling distribution of the mean for this data. Use 2000 bootstrap iterations. Upload a pic of your bootstrap histogram.

b. What is the bootstrap estimate of the mean and standard error?

c. What is the 95% bootstrap CI for the mean?

d. What is your R code for the 95% bootstrap CI for the mean?