资源描述：
《方差分析-R语言题.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、随机选取18位学生，把他们分成三组，每组6人，每一组用一种方法教学。一段时间后，对这18位学生进行统考测试，统考成绩如下：方法成绩甲756862715873乙818385689290丙737679607581假设三种方法甲、乙、丙所教学生的成绩均服从同方差的正态分布，问：这三种教学方法的效果有无显著差异？（显著水平）a1<-c(75,68,62,71,58,73)n1<-length(a1)a2<-c(81,83,85,68,92,90)n2<-length(a2)a3<-c(73,76,79,6
2、0,75,81)n3<-length(a3)a<-c(a1,a2,a3)ak<-c(n1,n2,n3)A<-factor(rep(1:3,ak))data.frame(a,A)->datakaov.datak<-aov(a~A,datak)sig<-summary(aov.datak)sigOK习题5.5a1<-c(20,20.5,18.8,19.3,20.9)n1<-length(a1)a2<-c(19.1,18.9,19.0,18.8,19.5)n2<-length(a2)a3<-c(18.5
3、,18.2,17.8,18.8,18.3)n3<-length(a3)a4<-c(18.7,18.5,18,18.6,19)n4<-length(a4)a<-c(a1,a2,a3,a4)ak<-c(n1,n2,n3,n4)A<-factor(rep(1:4,ak))data.frame(a,A)->datakaov.datak<-aov(a~A,datak)sig<-summary(aov.datak)sig第2问t检验x<-c(19.1,18.9,19.0,18.8,19.5)y<-c(18.5
4、,18.2,17.8,18.8,18.3)alpha<-0.05t.test(x,y,var.equal=TRUE,conf.level=1-alpha)
