# \donttest{
library(metan)
# traditional usage approach
j_an <- anova_joint(data_ge,
                    env = ENV,
                    gen = GEN,
                    rep = REP,
                    resp = everything())
# Predicted values
get_model_data(j_an)
# Details
get_model_data(j_an, "details")
# }
Run the code above in your browser using DataLab