题目

程序及结果

程序：

X<-c(80,203,236,252,284,368,
133,180,100,160,200,195,
156,295,320,448,465,481,
194,214,272,330,386,475)
A<-factor(rep(1:4,each=6))
miscellany<-data.frame(X,A)
aov.mis<-aov(X~A,data=miscellany)
summary(aov.mis)

结果：

            Df Sum Sq Mean Sq F value Pr(>F)
A            3 137206   45735   4.782 0.0114 *
Residuals   20 191288    9564
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

我们采用自编函数 anova.tab()得到完整的方差分析表:

anova.tab<-function(fm)
{tab<-summary(fm)
k<-length(tab[[1]])-2
temp<-c(sum(tab[[1]][,1]),sum(tab[[1]][,2]),rep(NA,k))
tab[[1]]["Total",]<-temp
tab
}

调用函数及结果：

> anova.tab(aov.mis)Df Sum Sq Mean Sq F value Pr(>F)
A            3 137206   45735   4.782 0.0114 *
Residuals   20 191288    9564
Total       23 328494
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

由程序结果可以列出方差分析表：

结果分析

三、单因素方差分析例题（R语言）相关推荐

统计学习导论之R语言应用（三）：线性回归R语言代码实战
统计学习导论(ISLR) 参考资料 The Elements of Statistical Learning An Introduction to Statistical Learning 统计学习导 ...
最大熵，三硬币模型的R语言代码
#最大熵算法 #< 统计学习方法>最大熵,三硬币模型的R语言代码有3个硬币,分布为A.B.C,硬币正面的概率是pai,p,q.投币实验如下,先投A,如果A是正面,即A=1,那么选择投B: ...
r语言实现岭回归_预测分析：R语言实现
预测分析:R语言实现作者:(希)鲁伊·米格尔·福特(Rui Miguel Forte) 著出版日期:2016年10月文件大小:53.55M 支持设备: ￥40.00仅供试读适用客户端: 言商书 ...
可用于主成分分析、R型因子分析、简单相应分析的R语言函数总结
一.主成分分析主成分分析是多元统计分析的一种常用的降维方法,它以尽量少的信息损失,最大程度将变量个数减少,且彼此间互不相关.提取出来的新变量成为主成分,主成分是原始变量的线性组合. 1.1 KMO检 ...
高级转录组调控分析和R语言数据可视化第十三期（线上线下，7月底开课）
福利公告:为了响应学员的学习需求,经过易生信培训团队的讨论筹备,现决定安排扩增子16S分析.宏基因组.转录组线上直播课.报名参加线上直播课的老师可在365天内选择参加同课程的一次线下课 .期待和大家的 ...
高级转录组分析和R语言数据可视化第十三期（线上线下同时开课）
" 福利公告:为了响应学员的学习需求,经过易生信培训团队的讨论筹备,现决定安排扩增子16S分析.宏基因组.Python课程线上直播课.报名参加线上直播课的老师可在1年内选择参加同课程的一次线 ...
高级转录组分析和R语言数据可视化第12期 (线上线下同时开课)
" 福利公告:为了响应学员的学习需求,经过易生信培训团队的讨论筹备,现决定安排扩增子16S分析.宏基因组.Python课程线上直播课.报名参加线上直播课的老师可在1年内选择参加同课程的一次线 ...
最后1周 | 高级转录组分析和R语言数据可视化第十一期 (报名线上课还可免费参加线下课)...
" 福利公告:为了响应学员的学习需求,经过易生信培训团队的讨论筹备,现决定安排扩增子16S分析.宏基因组.Python课程线上直播课.报名参加线上直播课的老师可在1年内选择参加同课程的一次线 ...
最后2周 | 高级转录组分析和R语言数据可视化第十一期 (报名线上课还可免费参加线下课)...
" 福利公告:为了响应学员的学习需求,经过易生信培训团队的讨论筹备,现决定安排扩增子16S分析.宏基因组.Python课程线上直播课.报名参加线上直播课的老师可在1年内选择参加同课程的一次线 ...
三十、开始R语言之旅
@Author : By Runsen @Written Date:2019/06/15 @modified Date:2020/5/14 作者介绍:Runsen目前大三下学期,专业化学工程与工艺,大 ...

三、单因素方差分析例题（R语言）

题目

程序及结果

结果分析

三、单因素方差分析例题（R语言）相关推荐

最新文章

热门文章