p1 <- example_scatterplot()
p2 <- example_barplot()
p1 + scale_color_d3()
p2 + scale_fill_d3()
p1 + scale_color_d3(palette = "category20")
p2 + scale_fill_d3(palette = "category20")
p1 + scale_color_d3(palette = "category20b")
p2 + scale_fill_d3(palette = "category20b")
p1 + scale_color_d3(palette = "category20c")
p2 + scale_fill_d3(palette = "category20c")
Run the code above in your browser using DataLab