library("MASS") # for Boston Housing data
x <- Boston[,-c(1,4,9)]
dm <- sqrt(mahalanobis(x, colMeans(x), cov(x)))
sort(dm)
hist(dm)
rug(dm)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.