为R中的所有变量执行Anova

Question

对于anova，R有# Using OPs data library(reshape2) dcast(melt(df1, 1), DRAW ~ value) 。所以，如果我想执行它，我可以编写简单的代码：

aov-function

如果我三次写这段代码，我可以为每个变量执行3个anova。 但是如何同时对所有三个变量执行anova？ I.E.不要为每个df2=read.csv("C:/Users/Admin/Desktop/222.csv",sep=";", dec=",") fit=aov(x1 ~ Q7,data=df2) summary(fit) 写这个。

X

Answer 1

您可以使用reformulate()来提供在aov`函数中使用的公式。

lapply(names(df2[-1]),function(x)aov(reformulate("Q7",x),data=df2))

您还可以在上面的代码中添加summary