calculate_energy_savings.RdImplements 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"
)Tibble produced by calculate_baseline_energy_consumption().
Tibble produced by calculate_project_energy_consumption().
Column name storing baseline energy in baseline_energy.
Column name storing project energy in project_energy.
Name of the resulting column storing energy savings in MWh.
A tibble containing the union of grouping columns and energy savings in MWh.
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