R语言与统计分析第六章习题答案.doc

《R语言与统计分析第六章习题答案.doc》由会员分享，可在线阅读，更多相关《R语言与统计分析第六章习题答案.doc（2页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 #第六章习题#6.1speed-c(914,920,910,934,953,940,912,924,930) #方差未知，小样本要t分布检验t.test(speed,mu=950,conf.level=0.99)#6.2chisq.var.test-function(x,var,alpha,alternative=two.sided) options(digits=4) result-list() n-length(x) v-var(x) result$var-v chi2-(n-1)*v/var result$chi2-chi2 p-pchisq(chi2,n-1) result$p.va

2、lue-p if(alternative=less) result$p.value-pchaisq(chi2,n-1,lower.tail=F) else if (alternative=two.sider) result$p.value-2*min(pchaisq(chi2,n-1),pchaisq(chi2,n-1,lower.tail=F) result$conf.int-c( (n-1)*v/qchisq(alpha/2,df=n-1,lower.tail=F), (n-1)*v/qchisq(alpha/2,df=n-1,lower.tail=T) ) resultx-c(1.32,

3、1.55,1.36,1.40,1.1)chisq.var.test(x,0.0482,0.05,alternative=two.side) #0.95置信区间#6.3install.packages(DAAG)library(DAAG)x1-c(5.5,5.6,6.3,4.6,5.3,5.0,6.2,5.8,5.1,5.2,5.9)x2-c(3.8,4.3,4.2,4.9,4.5,5.2,4.8,4.5,3.9,3.7,3.6,2.9) z-data.frame(x1,x2)onesamp(z,x=x1,y=x2)#方法二 方差相等x1-c(5.5,5.6,6.3,4.6,5.3,5.0,6.

4、2,5.8,5.1,5.2,5.9)x2-c(3.8,4.3,4.2,4.9,4.5,5.2,4.8,4.5,3.9,3.7,3.6,2.9)var.test(x1,x2)t-(mean(x1)-mean(x2)/(sqrt(10*var(x1)+11*var(x2)/21)*sqrt(1/11+1/12)tp-pt(t,df=21)p #6.4A-c(0.14,0.138,0.143,0.142,0.144,0.137)B-c(0.135,0.14,0.142,0.136,0.138,0.130)var.test(A,B)t.test(A,B,paired=TRUE)#6.5prop.test(12,15,p=0.3,correct=TRUE)binom.test(c(12,3),p=0.3)2 0 , ( . = . . = 0 0 ,习习 0 0 0 , , , , (. = ) + ) ( *( ) - ( ( . ,. , . - . , .,. , .(相方二 =,( ( ),., ., ,. . , . .区置 0 0, 00 . ,., = - , / ) ,/ )- )= , ) * = = - ( $ = (- , - $ *- - ( ( ( ) . . 0=, 检布本，未# , , 0, .