Unformatted text preview: at level α = 0 . 05. > x<c(30, 25, 70, 110, 40, 80, 50, 60, 100, 60) > mean(x) [1] 62.5 > z<(mean(x)100)/(10/sqrt(10)) > z [1] 11.85854 > qnorm(0.05) [1] 1.644854 Assume the IQ of a dog follows X i ∼ N ( μ, σ 2 ) , where σ is unknown. Test H : μ = 100 vs. H 1 : μ < 100 at level α = 0 . 05. > t=(mean(x)100)/(sd(x)/sqrt(10)) > t [1] 4.205156 > qt(0.05,9) [1] 1.833113 > t.test(x,mu=100,alternative="less", conf.level=0.95) One Sample ttest data: x t = 4.2036, df = 9, pvalue = 0.001147 alternative hypothesis: true mean is less than 100 95 percent confidence interval:Inf 78.8531 sample estimates: mean of x 62.5 Selfstudy problems Example 8.6., 8.8., 8.9. Assignment III. Due March 13. 11:00am. 8.24., 8.26, 8.28., 8.36. (a) and (b) only, 8.38....
View
Full Document
 Fall '04
 Chung
 Statistics, Normal Distribution, Statistical hypothesis testing, rejection region

Click to edit the document details