(1 point) You are interested in estimating μA, the mean monthly rate of return of the stock of Company A listed on the Toronto Stock Exchange. You randomly pick n = 34 months, for each you observe the monthly rate of return of Company A stock. You have observed the following data, in %. 4, 4.29, 8.84, 4.85, 8.57, 4.74, 6.5, 6.83, 5.29, 3.34, 7.68, 5.29, 6.81, 6.7, 2.52, 4.95, 1.56, 6.69, 9.08, 6.42, 9.13, 5.33, 3.78, 4.65, 6.25, 3.29, 8.08, 3.46, 6.57, 2.27, 6.63, 7, 5.9, 4.28 Data from the sample, are saved in the Download.csv file. (a) Find a 95% confidence interval for μA, by Bootstrapping 1000 samples. Use the seed 3895 to ensure that R-Studio "randomly" samples the same "random" samples as this question will expect. Use at least 4 digits after the decmial if rounding. You can do this by including the code, you can copy it into your R-Studio to bootstrap your samples. RNGkind(sample.kind = "Rejection"); set.seed(3895); B=do(1000) * mean(resample(c(4, 4.29, 8.84, 4.85, 8.57, 4.74, 6.5, 6.83, 5.29, 3.34, 7.68, 5.29, 6.81, 6.7, 2.52, 4.95, 1.56, 6.69, 9.08, 6.42, 9.13, 5.33, 3.78, 4.65, 6.25, 3.29, 8.08, 3.46, 6.57, 2.27, 6.63, 7, 5.9, 4.28), 34)); Ignore any errors or warnings that show up. lower bound = upper bound = (b) From the from 95% confidence interval found in (a), can you conclude that the mean monthly rate of return of Company A stock is 8%, or HA = 8%? ? because the ? of the 95% confidence interval is ? 8%. (c) From the from 95% confidence interval found in (a), can you conclude that the mean monthly rate of return of Company A stock greater than 6%, or HA > 6%? ? because the ? of the 95% confidence interval is ? 6%.