ggplot2_colors

library(ggplot2)
library(RColorBrewer)

gg_color_hue <- function(n) {
  hues = seq(15, 375, length = n + 1)
  hcl(h = hues, l = 65, c = 100)[1:n]
}

n = 4
cols = gg_color_hue(n)

# red = "#F8766D"
# blue = "#00BFC4"


dev.new(width = 4, height = 4)
plot(1:n, pch = 16, cex = 2, col = cols)