Implements Equation (1) of AMS-I.C by summing the useful thermal energy supplied to end users during the baseline scenario.

calculate_baseline_thermal_output(
  thermal_data,
  energy_col = "thermal_energy_mwh",
  group_cols = NULL
)

Arguments

thermal_data

A tibble with the column specified in energy_col and optional grouping columns.

energy_col

Column name containing useful thermal energy in megawatt-hours thermal (MWhth).

group_cols

Optional character vector of grouping columns used to aggregate thermal energy.

Value

A tibble with grouping columns (if provided) and a column named baseline_thermal_output_mwh.

Examples

thermal <- tibble::tibble(facility_id = c("A", "B"), thermal_energy_mwh = c(800, 620))
calculate_baseline_thermal_output(thermal)
#> # A tibble: 1 × 1
#>   baseline_thermal_output_mwh
#>                         <dbl>
#> 1                        1420