1. require(rCharts)
  2. p1 <- rPlot(mpg ~ wt, data = mtcars, type = 'point')