library(SSN)
# get some model fits stored as data objects
data(modelFits)
#NOT RUN use this one
#fitSp <- glmssn(Summer_mn ~ ELEV_DEM + netID,
# ssn.object = mf04p, EstMeth = "REML", family = "Gaussian",
# CorModels = c("Exponential.tailup","Exponential.taildown",
# "Exponential.Euclid"), addfunccol = "afvArea")
#for examples only, make sure fitSp has the correct path
#if you use importSSN(), path will be correct
fitSp$ssn.object <- updatePath(fitSp$ssn.object,
paste0(tempdir(),'/MiddleFork04.ssn'))
resids <- residuals(fitSp)
class(resids)
names(resids)
plot(resids)
hist(resids, xlab = "Raw Residuals")
qqnorm(resids)
resids.df <- getSSNdata.frame(resids)
plot(resids.df[,"_resid_"], ylab = "Raw Residuals")
Run the code above in your browser using DataLab