在R中的函数内调用外部参数

Question

我想对几个数据（日，周和月）进行ANOVA测试。我的想法是创建一个调用每个数据集（日，周和月）的循环。但是，以下代码不起作用，因为无法识别值[i]。

df1<-data.frame(Day=c(1,2,5,6,9,8),Week=c(22,45,33,3,2,11),Month=c(45,6,7,12,4,7),
           type=c("A","C","B","A","C","B"))

value<-c("Day","Week","Month")

    for(i in 1:length(value)){
    av<-aov(value[i] ~ type, data = data)
    return(av)
    }

您对我如何改进代码有任何建议吗？

Answer 1

您不需要循环：

m <- aov(cbind(Day, Week, Month) ~ type, data = df1)
summary(m)