R/fishpals_cols.R

In fishsciences/fishpals: Fish Color Palettes, Scales (Ha!), and Themes for Plots

#' Fish palettes Core Colors list - still growing
#' The names of the colors have to match those in fishpals_pals
#' @keywords internal

fishpals_cols <- c(

  # juvsteelhead
  `juvsteel green` = "#A3C595" ,
  `juvsteel taupe` =   "#BA8F78" ,
  `juvsteel grey` = "#5D5360",
  `juvsteel jungle green` = "#1c240d" ,
  `juvsteel tuscan red` = "#784039" ,

  # adultsteelhead
  `adultsteel dark liver` = "#504C41",
  `adultsteel red ochre` = "#E2704D",
  `adultsteel gray` = "#B8BABD",
  `adultsteel feldgrau`  = "#4B5859",
  `adultsteel spanish bistre` =  "#707239",

  # adultchinook
  `chinook red` = "#BA1D57",
    `chinook blue` = "#0C4FA0" ,
  `chinook dark gray` = "#273535",
  `chinook pink` = "#EFB0A1",
    `chinook olive` =  "#8DAD6E",


  # greensunfish
  `sunfish green` ="#4EC4B8",
  `sunfish tan` = "#8C7A4B",
  `sunfish yellow` = "#F1B24A",
  `sunfish gray` = "#636271",
  `sunfish dark gray` = "#2D3040",

  # cfs
  `CFS blue` = "#1372AA",
  `CFS dark gray` = "#3B4856",
  `CFS gridlines` = "#9FADBD",
  `CFS tan` = "#8B662E",
  `CFS light tan` = "#C3985E",
  `CFS teal` = "#1CD2A3",

  # genidaqs
  `genidaqs yellow` = "#FAFF6B",
   `genidaqs blue` = "#2597C4" ,
  `genidaqs brown` = "#3A3737",
  `genidaqs green` = "#6CFC95",
  `genidaqs pink` = "#CA5B97" ,

  # surgewrasse
`surgewrasse orange` = "#E24D4D",
`surgewrasse teal` =   "#1C5B67",
`surgewrasse green` = "#B6DD18",
`surgewrasse blue` = "#12DAF6",
`surgewrasse purple` = "#966480"

)