powered by
cbbPalette
http://www.cookbook-r.com/Graphs/Colors_(ggplot2)/
Hence, I don't take any credit for this.
scale_fill_discrete <- function(...) scale_fill_manual(..., values=cbbPalette) scale_colour_discrete <- function(...) scale_fill_manual(..., values=cbbPalette)
Run the code above in your browser using DataLab