added the nmfspalette package's color palette to the figures in the a…

…dd_theme function

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) {