# NOT RUN {
## Hald Cement data
data(Hald)
model <- lm(y~X1+X2+X3+X4, data = as.data.frame(Hald))
## all oveall diagnostic measures and eigenvalues with intercept
od<-omcdiag(model)
## all oveall diagnostic measures and eigenvalues without intercept
omcdiag(model, Inter=FALSE)
## all oveall diagnostic measures and eigenvalues with intercept
## with different determinant and confidence level threshold
omcdiag(model, detr=0.001, conf=0.99)
## returns the determinant of correlation matrix |X'X|
omcdiag(model)[1]
# }
Run the code above in your browser using DataLab