R/scale_color_discrete_grattan.R

In HughParsonage/grattanCharts: Create Charts in the Style of the Grattan Insitute, Melbourne

#' scale color scale for grattan (uses the palette)
#' @export
#' @param ... arguments passed to discrete_scale.
#' @param reverse (logical) Option to reverse the palette.
#' @details A function controlling the colors.


scale_color_discrete_grattan <-  function(..., reverse = FALSE) ggplot2::discrete_scale("colour", "hue", function(n) gpal(n, reverse = reverse), ...)
scale_colour_discrete_grattan <- function(...) scale_color_discrete_grattan(...)