Note: the colors may appear not distingushable in the html version,
but they always work fine in console.
print_color(c("red", "navy", "pink", "#E58700", "limegreen"))
#>
#> ------ c red navy pink #E58700 limegreen ------
#>
print_color(c("red", "navy", "pink", "#E58700", "limegreen"),
type = "r")
#>
#> ------ c red navy pink #E58700 limegreen ------
#> red
#> navy
#> pink
#> #E58700
#> limegreen
print_color(palette(rainbow(6)), blank.len = 1)
#>
#> ------ palette rainbow(6) ------
#>
print_color(palette(rainbow(6)), type = 'r')
#>
#> ------ palette rainbow(6) ------
#> red
#> yellow
#> green
#> cyan
#> blue
#> magenta
p1 <- ggplot(mpg) +
geom_point(aes(displ, cyl, color = manufacturer))
print_color(p1)
#>
#> ---ggplot object---
#>
print_color(p1, type = 'r')
#> ---ggplot object---
#> #F8766D
#> #E58700
#> #C99800
#> #A3A500
#> #6BB100
#> #00BA38
#> #00BF7D
#> #00C0AF
#> #00BCD8
#> #00B0F6
#> #619CFF
#> #B983FF
#> #E76BF3
#> #FD61D1
#> #FF67A4