Add scale_fill() that was misnamed

This commit is contained in:
gnoblet 2022-05-14 10:31:40 -04:00
parent 4811f00b3f
commit a13dc5e5fe
31 changed files with 186 additions and 58 deletions

View file

@ -49,7 +49,7 @@ scale_color <- function(initiative = "reach", palette = "main", discrete = TRUE
#' @return A fill scale for ggplot
#'
#' @export
scale_color <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, ...) {
scale_fill <- function(initiative = "reach", palette = "main", discrete = TRUE, reverse = FALSE, ...) {
if (initiative == "reach") {
pal <- pal_reach(