Question: 4. (10 points) Use the following R code and output to answer the questions below: > CPSSW8 %>% summarise(variance_of_earnings = mean((earnings - mean(earnings))^2)) variance_of_earnings 1
4. (10 points) Use the following R code and output to answer the questions below:
> CPSSW8 %>% summarise(variance_of_earnings = mean((earnings - mean(earnings))^2)) variance_of_earnings 1 102.5579 > my_sample = CPSSW8 %>% sample_n(99) > my_sample %>% summarise(mean(earnings)) mean(earnings) 1 18.6656
(a) Test the null hypothesis that the average earnings in theCPSSW8data set is $20/hour. Use a two-sided test with a 5% significance level.
Step by Step Solution
There are 3 Steps involved in it
Get step-by-step solutions from verified subject matter experts
