powered by
annotation_raster
add_cat(..., lighten = 0.7, bw = TRUE)
get_cat
height
width
FALSE
library(ggplot2) ggplot(mpg, aes(cty, hwy)) + add_cat() + geom_point() # In glorious kitty colours ggplot(mpg, aes(cty, hwy)) + add_cat(bw = FALSE) + geom_point()
Run the code above in your browser using DataLab