R 创建多个方差分析并将结果转换为数据帧
我下面有两个因子数据和两个数值数据,我想对它们的每一个组合进行方差分析测试。我还需要他们都在数据框,以便我可以输入到excel中。我很难循环它们。多谢各位R 创建多个方差分析并将结果转换为数据帧,r,dataframe,anova,R,Dataframe,Anova,我下面有两个因子数据和两个数值数据,我想对它们的每一个组合进行方差分析测试。我还需要他们都在数据框,以便我可以输入到excel中。我很难循环它们。多谢各位 df <- data.frame(age_group=rep(c("1","2","3"),10),civil_status=rep(c("1","2"),15),Happy=sample(30, replace = F),GoodWork=sample(30, replace = F) ) age_happy <-
df <- data.frame(age_group=rep(c("1","2","3"),10),civil_status=rep(c("1","2"),15),Happy=sample(30, replace = F),GoodWork=sample(30, replace = F) )
age_happy <- aov(Happy~age_group,data=df)
summary(age_happy)
TukeyHSD(age_happy)
df我写这段代码是为了帮助我缩短时间。我查看代码,然后在excel中复制粘贴,但似乎不会显示摘要
anova_loop <- function(numeric_group,factor_group,data_group){
group_anova <- aov(numeric_group~factor_group,data=theData2)
print(summary(group_anova))
group_Tukey<- TukeyHSD(group_anova, "factor_group", ordered = TRUE)
df_Tukey <- data.frame(group_Tukey$factor_group)
}
anova\u循环