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