Set the color scale for plots, adding zero_col if zero values are present

Usage

set_color(values, colfun = color_richness, zero_col = "navajowhite")

Arguments

values: a vector of values
colfun: a color function to use, default is color_richness, consider using color_richness_CVDCBP for color-blind safe colors
zero_col: a color to use for zero values, default is "navajowhite3"

Value

if type is "raster" the function returns a color scale, if type is "points" the function returns a vector of colors

Examples

# set color scale, no zero values!
vals <- c(1, 2, 3, 4, 5)
plot(
  1:5,
  vals,
  col = set_color(vals, color_richness, "navajowhite3"),
  pch = 15,
  cex = 2
)

# set color scale, zero values present!
vals <- c(0, 2, 3, 4, 5)
plot(
  1:5,
  vals,
  col = set_color(vals, color_richness_CVDCBP, "navajowhite3"),
  pch = 15,
  cex = 2
)

#Note that in case of presence of ZEROS, min values change with the scaling
#This only happens as scalling starts with zero as "navajowhite3" and 1 as the first value of colfun
vals <- c(0, 2, 2, 3, 4, 5, 5, 5) * 10
rc <- set_color(vals, color_richness, "navajowhite3")
plot(1:length(vals), vals, col = rc, pch = 15, cex = 2)