scatter.R

library(htmltools)
library(d3scatter)

browsable(tagList(
  d3scatter(iris, ~Petal.Width, ~Petal.Length, ~Species, group = "a"),
  d3scatter(iris, ~Sepal.Width, ~Sepal.Length, ~Species, group = "a")
))