## Make test data available
data(sind.mat2open)
## Estimate and display robust Mahalanobis distances
sind.save <- gx.md.gait.closed(sind.mat2open, mcdstart = TRUE, ifadd = NULL)
gx.md.print(sind.save, pcut = 0.3)
## Save display for future use
gx.md.print(sind.save, file = "sind.save.ilr.mcd.mds")
## Clean-up
rm(sind.save)
Run the code above in your browser using DataLab