data("diamonds", package = "ggplot2")
# Change default color(s)
apex(
data = diamonds,
mapping = aes(x = cut)
) %>%
ax_colors("#F7D358")
library(scales)
apex(
data = diamonds,
mapping = aes(x = cut, fill = color)
) %>%
ax_colors(brewer_pal(palette = "Set2")(7))
Run the code above in your browser using DataLab