plotly包：让ggplot2的静态图片变得可交互

library(plotly)
p <- ggplot(data = http://www.mamicode.com/diamonds, aes(x = cut, fill = clarity)) +
            geom_bar(position = "dodge")
ggplotly(p)