Plot sediment concentration averages by bay segment

Usage

show_sedimentave(
  sedimentdata,
  param,
  yrrng = c(1993, 2023),
  bay_segment = c("HB", "OTB", "MTB", "LTB", "TCB", "MR", "BCB"),
  funding_proj = "TBEP",
  lnsz = 1,
  base_size = 12,
  plotly = FALSE,
  family = NA,
  width = NULL,
  height = NULL
)

Arguments

sedimentdata: input sediment data.frame as returned by read_importsediment
param: chr string for which parameter to plot
yrrng: numeric vector indicating min, max years to include, use single year for one year of data
bay_segment: chr string for the bay segment, one to many of "HB", "OTB", "MTB", "LTB", "TCB", "MR", "BCB"
funding_proj: chr string for the funding project, one to many of "TBEP" (default), "TBEP-Special", "Apollo Beach", "Janicki Contract", "Rivers", "Tidal Streams"
lnsz: numeric for line size
base_size: numeric indicating text scaling size for plot
plotly: logical if matrix is created using plotly
family: optional chr string indicating font family for text labels
width: numeric for width of the plot in pixels, only applies of plotly = TRUE
height: numeric for height of the plot in pixels, only applies of plotly = TRUE

Value

A ggplot object or a plotly object if plotly = TRUE showing sediment averages and 95

Details

Lines for the Threshold Effect Level (TEL) and Potential Effect Level (PEL) are shown for the parameter, if available. Confidence intervals may not be shown for segments with insufficient data.

Examples

show_sedimentave(sedimentdata, param = 'Arsenic')