# NOT RUN {
## Run a single trait analysis using SpATS.
myModel <- fitTD(TD = TDHeat05, design = "res.rowcol", traits = "yield")
## Print a summary of the fitted model.
summary(myModel)
# }
Run the code above in your browser using DataCamp Workspace