library("MASS") # for Boston Housing data
tab <- table(Boston$rad)
pie(tab)
#
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.