R/colors.R
mean_color.Rd
Average across colors
mean_color(x)
color
string
color_A <- "dodgerblue" color_B <- "violet" mean_color(c(color_A, color_B)) #> [1] "#A68BF6"