Skip to contents

Get average concentrations for a sediment parameter by bay segment

Usage

anlz_sedimentpelave(
  sedimentdata,
  yrrng = c(1993, 2022),
  bay_segment = c("HB", "OTB", "MTB", "LTB", "TCB", "MR", "BCB"),
  funding_proj = "TBEP"
)

Arguments

sedimentdata

input sediment data.frame as returned by read_importsediment

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"

Value

A data.frame of the average of the average PEL ratios for each bay segment

Details

Summaries for all bay segments are returned by default. The averages and confidence intervals are specific to the year ranges in yrrng.

Examples

anlz_sedimentpelave(sedimentdata)
#> # A tibble: 7 × 5
#>   AreaAbbr    ave    lov    hiv grandave
#>   <fct>     <dbl>  <dbl>  <dbl>    <dbl>
#> 1 BCB      0.0535 0.0445 0.0625   0.0522
#> 2 HB       0.118  0.0663 0.169    0.0522
#> 3 LTB      0.0281 0.0247 0.0315   0.0522
#> 4 MR       0.0446 0.0375 0.0516   0.0522
#> 5 MTB      0.0374 0.0327 0.0421   0.0522
#> 6 OTB      0.0506 0.0371 0.0642   0.0522
#> 7 TCB      0.0337 0.0265 0.0409   0.0522