library("MASS") # for Boston Housing data
tab <- table(Boston$rad)
library("ggplot2")
pie <- ggplot(Boston, aes(x = factor(1), fill = factor(rad)))
pie + geom_bar(width = 1) + coord_polar(theta = "y")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.