# default behavior
library(ggplot2)
iris_plt <- ggplot(iris, aes(x=Sepal.Length, fill=Species)) +
geom_density(alpha=.5) +
scale_fill_profinit()
iris_plt
# With profinit theme
iris_plt + theme_profinit()
Run the code above in your browser using DataLab