find.outliers(A, color = 4, lwd = 1, lcol = 2, mahalanobis=FALSE,
PCuse=NULL, text = TRUE)
TRUE
, landmark labels (rownumbers) are displayedtypprob
,typprobClass
data(boneData)
## look for outliers using the mahalanobis distance based on the first
# 10 PCscores
outliers <- find.outliers(boneLM, mahalanobis= TRUE, PCuse=10)
n # everything is fine
n # proceed to next
s # let's switch some landmarks (3 and 4)
3
4
n # we are done
y # yes, because now it is an outlier
s #enough for now
Run the code above in your browser using DataLab