# NOT RUN {
## Fit model using lme4.
myModel1 <- fitTD(TD = TDHeat05, design = "ibd", traits = "yield")
## Create a pdf report summarizing the results for the model with genotype
## as fixed factor.
# }
# NOT RUN {
report(myModel1, outfile = tempfile(fileext = ".pdf"), what = "fixed")
# }
# NOT RUN {
## Create two pdf report summarizing the results for the model with genotype
## as fixed factor and for the model with genotype as random factor. Order
## the results in ascending order.
# }
# NOT RUN {
report(myModel1, outfile = tempfile(fileext = ".pdf"), descending = FALSE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab