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

1 Expert Approved Answer
Step: 1 Unlock blur-text-image
Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock
Step: 3 Unlock

Students Have Also Explored These Related Mathematics Questions!