# NOT RUN {
library(metan)
df <-
ge_simula(ngen = 10,
nenv = 3,
nrep = 4,
nvars = 2)
inspect(df, plot = TRUE)
# Change genotype effect (trait 1 with fewer differences among genotypes)
# Define different intercepts for the two traits
df2 <-
ge_simula(ngen = 10,
nenv = 3,
nrep = 4,
nvars = 2,
gen_eff = c(1, 50),
intercept = c(80, 1500))
inspect(df2, plot = TRUE)
# }
Run the code above in your browser using DataLab