devtools::install_github("nowosad/filmcolors")library('filmcolors')
# See all palettes
names(film_palettes)
#> [1] "Vertigo"
film_colors("Vertigo")
library('ggplot2')
ggplot(mtcars, aes(mpg, hp, color=as.factor(carb))) + geom_point(size=8) +
scale_color_manual(values = film_colors("Vertigo"))
colors <- c("#060306", "#290705", "#131325")
class(colors) <- 'palette'
colors
sorted_colors <- sort_colors(colors)
sorted_colors