data <- data.frame(
x = 1:10, y = 15:6,
group = rep(c("a", "b"), each = 5)
)
ggplot2::ggplot(data, ggplot2::aes(x = x, y = y, color = group)) +
ggplot2::geom_point(size = 4) +
scale_color_lgbtq("intersex") +
# Use the same name as for values, preferably
theme_lgbtq("intersex")
Run the code above in your browser using DataLab