Skip to contents

A convenience wrapper around ok_load() for reservoirs with more than one tributary. Accepts a data frame of tributary data, computes flow-weighted mean concentrations, sums inflow volumes, and calls ok_load() with the aggregated values.

Usage

ok_load_multi(
  tributaries,
  segment_label = "main",
  coefficients = "walker",
  ecoregion = NULL
)

Arguments

tributaries

A data frame with one row per tributary and these columns:

inflow_m3yr

Annual inflow volume (m^3/yr). Required.

tp_inflow_ugl

Flow-weighted mean TP (ug/L). Required.

tn_inflow_ugl

Flow-weighted mean TN (ug/L). Optional.

tss_inflow_mgl

Flow-weighted mean TSS (mg/L). Optional.

segment_label

Character. Segment label passed to ok_load(). Default "main".

coefficients

Coefficient set. Default "walker".

ecoregion

EPA Level III ecoregion name. Default NULL. Passed through to ok_load().

Value

An okBATHTUB object at pipeline step "load".

See also

Examples

tribs <- data.frame(
  inflow_m3yr   = c(30e6, 15e6),
  tp_inflow_ugl = c(110,  145),
  tn_inflow_ugl = c(1600, 2100)
)
result <- ok_load_multi(tribs)