4
x=c(9.8,10.4,10.6,9.6,9.7,9.9,10.9,11.1,9.6,10.2,10.3,9.6,9.9,11.2,10.6,9.8,10.5,10.1.10.5,9.7) mean(x) t.test(x, alternative = "greater" , mu = 10)
7
x=c(6,4,5,5,6,5,5,6,4,6,7,4) y=c(2,1,2,2,1,0,3,2,1,0,1,3) mean(x) mean(y) t. test(x, y, alternative = "greater", mu = 2)
17
x=c(101,100,99,99,98,100,98,99,99,99) y=c(100,98,100,99,98,99,98,98,99,100) mean(x) mean(y) var.test(x, y) t.test(x, y, alternative = "two.sided")