Implements Equation (3) of AMS-II.C by subtracting project energy consumption from baseline energy consumption.

calculate_energy_savings(
  baseline_energy,
  project_energy,
  baseline_col = "baseline_energy_mwh",
  project_col = "project_energy_mwh",
  output_col = "energy_savings_mwh"
)

Arguments

baseline_energy

Tibble produced by calculate_baseline_energy_consumption().

project_energy

Tibble produced by calculate_project_energy_consumption().

baseline_col

Column name storing baseline energy in baseline_energy.

project_col

Column name storing project energy in project_energy.

output_col

Name of the resulting column storing energy savings in MWh.

Value

A tibble containing the union of grouping columns and energy savings in MWh.

Examples

baseline <- tibble::tibble(site = c("A", "B"), baseline_energy_mwh = c(46, 28))
project <- tibble::tibble(site = c("A", "B"), project_energy_mwh = c(24, 18))
calculate_energy_savings(baseline, project)
#> # A tibble: 2 × 4
#>   site  baseline_energy_mwh project_energy_mwh energy_savings_mwh
#>   <chr>               <dbl>              <dbl>              <dbl>
#> 1 A                      46                 24                 22
#> 2 B                      28                 18                 10