estimate_emission_reductions_ams_iiq.RdChain the AMS-II.Q equation helpers to produce baseline emissions, project grid and onsite emissions, leakage, and emission reductions for commercial building projects.
estimate_emission_reductions_ams_iiq(
baseline_data,
project_data,
leakage_data = NULL,
group_cols = NULL,
baseline_energy_consumption_col = "baseline_energy_use_mwh",
baseline_emission_factor_col = "baseline_emission_factor_tco2_per_mwh",
baseline_service_output_col = "baseline_service_output_mwh",
project_energy_consumption_col = "project_energy_use_mwh",
project_emission_factor_col = "project_emission_factor_tco2_per_mwh",
project_service_output_col = "project_service_output_mwh",
project_onsite_energy_col = "project_onsite_energy_gj",
project_onsite_emission_factor_col = "project_onsite_emission_factor_tco2_per_gj",
leakage_col = "leakage_emissions_tco2e"
)Tibble containing baseline monitoring observations.
Tibble containing project monitoring observations.
Optional tibble containing leakage emissions (tCO2e).
Optional character vector of grouping columns shared across inputs.
Column storing baseline energy use.
Column storing baseline emission factors.
Optional column storing baseline service output.
Column storing project grid energy use.
Column storing project emission factors.
Optional column storing project service output.
Optional column storing onsite energy use.
Column storing emission factors for onsite energy.
Column storing leakage emissions when leakage_data is supplied.
A tibble containing baseline emissions, project emissions, leakage, and emission reductions.
baseline <- tibble::tibble(
building_id = c("A", "B"),
baseline_energy_use_mwh = c(800, 560),
baseline_emission_factor_tco2_per_mwh = 0.62,
baseline_service_output_mwh = c(720, 510)
)
project <- tibble::tibble(
building_id = c("A", "B"),
project_energy_use_mwh = c(520, 380),
project_emission_factor_tco2_per_mwh = 0.58,
project_service_output_mwh = c(720, 510),
project_onsite_energy_gj = c(120, 40),
project_onsite_emission_factor_tco2_per_gj = 0.05
)
estimate_emission_reductions_ams_iiq(baseline, project, group_cols = "building_id")
#> # A tibble: 2 × 9
#> building_id baseline_emissions_tco2e baseline_energy_intensity
#> <chr> <dbl> <dbl>
#> 1 A 496 1.11
#> 2 B 347. 1.10
#> # ℹ 6 more variables: project_grid_emissions_tco2e <dbl>,
#> # project_energy_intensity <dbl>, project_onsite_emissions_tco2e <dbl>,
#> # project_emissions_tco2e <dbl>, leakage_emissions_tco2e <dbl>,
#> # emission_reductions_tco2e <dbl>