资源描述:
《方差分析-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)