置信区间（两个总体）.doc

二个正态总体 ~N ( , )的情形 一、与已知，求－的置信区间 x-c(510,628,583,615,554,612,530,525) y-c(433,535,398,470,560,567,498,480,503,426) x.bar-mean(x) y.bar-mean(y) alpha-0.05 m-length(x) n-length(y) t1-(x.bar-y.bar)-qnorm(1-alpha/2)*sqrt(sigma1^2/m+ sigma2^2/n) t2-(x.bar-y.bar)+qnorm(1-alpha/2)*sqrt(sigma2^2/m+ sigma2^2/n) list(C.I=c(t1,t2)) 二、与未知，但，求μ1－μ2的置信区间 t3-(x.bar-y.bar)-qt(1-alpha/2,m+n-2)*sqrt(1/m+1/n)*sqrt(((m-1)*sd(x)^2+(n-1)*sd(y)^2)/( m+n-2)) t-(x.bar-y.bar)+qt(1-alpha/2,m+n-2)*sqrt(1/m+1/n)*sqrt(((m-1)*sd(x)^2+(n-1)*sd(y)^2)/(m+n-2)) list(C.I=c(t3,t4)) 三、μ1和μ2已知，求/的置信区间 / x-c(25,28,23,26,29,22) y-c(28,23,30,35,21,27) μ1=25 μ2=27 alpha-0.05 f-sum((x-μ1)^2)/ sum((y-μ2)^2) t5-f/qf(1-alpha/2,length(x),length(y)) t6-f/qf(alpha/2,length(x),length(y)) list(C.I=c(t5,t6)) 四、1和μ2未知，求/的置信区间（卷烟厂作业题） / x-c(25,28,23,26,29,22,27) y-c(28,23,30,35,21,27) alpha-0.01 m-length(x) n-length(y) t7-(sd(x)/sd(y))^2/qf(1-alpha/2,m-1,n-1) t8-(sd(x)/sd(y))^2/qf(alpha/2,m-1,n-1) list(C.I=c(t7,t8)) - 2 -