data(Cascades)
# plot a matrix of scatterplots
pairs(Cascades,
main="Cascades data set",
pch=21,
bg=c("red", "green3", "blue"))
mcd<-CovMcd(Cascades)
mcd
plot(mcd, which="dist", class=TRUE)
plot(mcd, which="dd", class=TRUE)
Run the code above in your browser using DataLab