diff --git a/R/add_theme.R b/R/add_theme.R index e7c5fba..40663ab 100644 --- a/R/add_theme.R +++ b/R/add_theme.R @@ -33,7 +33,12 @@ add_theme <- function(x) { panel.grid = ggplot2::element_blank(), panel.border = ggplot2::element_rect(colour = "black", fill = NA, linewidth = 0.5) # text = ggplot2::element_text(size = 12, family = "Cambria") - ) + ) + + # add nmfs color palette (palette will be default) + # I believe including both functions is fine and will + # works regardless of the type of plot (one won't be used) + nmfspalette::scale_color_nmfs() + + nmfspalette::scale_fill_nmfs() # Determining how to treat a legend if there is one # check if one is present # check_for_legend <- function(x) {