r i = {{i}}

{{i+1}}. Analysis for variable r vars[i]

lc <- ck.f(dfr, vars[i], c(geno, env), rep)

r if (lc$nrep == 1) {"There is only one replication. Analysis is not possible with one replication."}

r if (lc$nrep > 1 & lc$nt.mult > 0) {"There is more than one datum for at least one combination of the genotypes and environments in at least one replication. This could be the result of a mislabeling for the levels of the factors. The table below shows the frequencies of valid data for each genotype and environment in each replication."}

r if (lc$nt.0 > 0 & lc$nrep > 1 & lc$nt.mult == 0) {"There is at least one genotype without data in at least one environment. The table below shows the frequencies of valid data for each genotype in each environment. A MET analysis cannot be produced if there are combination of genotypes and environments without data."}

r if (lc$pmis > maxp & lc$nt.0 == 0 & lc$nrep > 1 & lc$nt.mult == 0) paste0("There are too many missing values (", format(lc$pmis * 100, digits = 3), "%). The table below shows the frequencies of valid data for each genotype in each environment. This procedure estimates up to 10%.")

if (lc$nrep > 1 & lc$nt.mult == 0)
  lc$tf
if (lc$nrep > 1 & lc$nt.mult > 0)
  lc$tfr


reyzaguirre/pepa documentation built on March 29, 2025, 9:56 p.m.