# NOT RUN {
library(metan)
mod <- gge(data_ge, ENV, GEN, GY)
plot(mod)
# GGE model for all numeric variables
mod2 <- gge(data_ge2, ENV, GEN, resp = everything())
plot(mod2, var = "ED")
# If we have a two-way table with the mean values for
# genotypes and environments
table <- make_mat(data_ge, GEN, ENV, GY) %>% round(2)
table
make_long(table) %>%
gge(ENV, GEN, Y) %>%
plot()
# }
Run the code above in your browser using DataLab