Q2.View the partial R output below and answer the following questions.

> control = c(372.4, 345.5, 321.2, 244.3, 163.0, 147.8, 95.0, 87.0, 81.2, 68.5, 47.3, 41.1, 36.6, 29.0, 28.6, 26.3, 26.1, 24.4, 21.7, 17.3, 11.5, 4.9, 4.9, 1.0)

> seeded = c( 1656.0, 978.0, 703.4, 489.1, 430.0, 334.1, 302.8, 274.7, 274.7, 255.0, 242.5, 200.7, 198.6, 129.6, 119.0, 118.3, 115.3, 92.4, 40.6, 32.7, 31.4, 17.5, 7.7, 4.1)

> shapiro.test(control)

data:control

W = 0.6022, p-value = 3.131e-07

> shapiro.test(seeded)

data:seeded

W = 0.6563, p-value = 1.411e-06

Test statistic

data:control and seeded

W = 203, p-value = 0.01383

1. What type of test is being run in this analysis?Provide at least three reasons you made this choice.

1. Based on the output would you accept or reject the null hypothesis? Make sure you name the value/s you are using to make this decision.

1. What types of summary statistics would you use to show central tendency and variability?