if (FALSE) {
library(GerminaR)
smr <- ger_summary(SeedN = "seeds", evalName = "D", data = prosopis)
mc <- gquant_analysis(data = smr
, response = "grp"
, factors = c("nacl", "temp")
, block = "rep"
, comparison = c("nacl", "temp")
)
mc
}
Run the code above in your browser using DataLab