# NOT RUN {
library(metan)
# traditional usage approach
anova1 = anova_joint(data_ge,
env = ENV,
gen = GEN,
rep = REP,
resp = GY)
# Using the pipe operator %>%
# Two variables, one run.
anova2 = data_ge %>% anova_joint(ENV, GEN, REP, c(GY, HM))
# }
Run the code above in your browser using DataLab