R语言与统计分析第六章习题答案(共2页).docx

精选优质文档-倾情为你奉上 #第六章习题#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.value-p if(alternative=less) result$p.value-pchaisq(chi2,n-1,lower.tail=F)