# NOT RUN {
# Simulate some data
x <- data.frame(C1 = rnorm(100), C2 = rnorm(100), C3 = rnorm(100))
# Add Mahalanobis distances
x %>% dplyr::mutate(MD = mahalanobis_distance(x))
# Add Mahalanobis and breakdown distances
x %>% cbind(mahalanobis_distance(x, output = "both"))
# Add Mahalanobis and normalized breakdown distances
x %>% cbind(mahalanobis_distance(x, output = "both", normalize = TRUE))
# }
Run the code above in your browser using DataLab