Yan Feng
July 9th, 2017
IS.subset = subset(InsectSprays, InsectSprays$spray == c("B", "C", "D"))
library(ggplot2)
ggplot(IS.subset, aes(x = spray, y = count)) + geom_boxplot(aes(color = spray))
After t-test of spray B and spray C, the p value is
[1] 5.170528e-08
Conclusion: B and C are significantly different.