R/colors.R
mean_color.Rd
Average across colors
mean_color(x)
color
character
mean_color(c("red", "violet")) #> [1] "#FF547D"