# NOT RUN {
library(metan)
model <- gamem(data_g,
gen = GEN,
rep = REP,
resp = c(KW, NR, NKE, NKR))
mgidi_index <- mgidi(model)
plot(mgidi_index)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab