r Shiny + d3js: Scatterplot