##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
htwt.lm <- lm(height ~ weight, data=women)
gphlist <- plotSimDiags(obj=htwt.lm, which=c(1:3,5))
## The function is currently defined as
function (obj, ...)
{
UseMethod("plotSimDiags")
}
Run the code above in your browser using DataLab