r - ANOVA and Tukey-HSD across table

Question

I would like to run a one-way ANOVA followed by a Tukey across each column of a table. My example table is:

DF<-data.frame(A=c(rep("Positive", 3), rep("Negative",3)),
                  B=c(rep(c("Control","Treatment"),3)),
                  Values=c(12,23,12,24,12,34),
                  Values2=c(32,34,65,23,54,23),
                  Values3=c(34,34,56,21,56,21),
                  Values4=c(76,36,87,21,85,23))

I would like to run something like:

aov(data=DF, formula=Values~A*B)

for each single column and then followed by a Tukey.

My first attempt I tried this:

avn<-function(x){aov(x, formula = x~A*B)}

t.DF<-apply(aj.fr, 2, avn)

and got errors. Can someone suggest how to proceed with this?

question from:https://stackoverflow.com/questions/65602862/anova-and-tukey-hsd-across-table

Answer 1

Waitting for answers