Estimate emission reductions under AMS-I.C

Composes the equation-level helpers to compute emission reductions for datasets capturing useful thermal energy delivered and baseline emission factors.

estimate_emission_reductions_ams_ic(
  thermal_data,
  baseline_emission_factor,
  project_emission_factor = 0,
  group_cols = NULL
)

Arguments

thermal_data

Tibble containing useful thermal energy observations in MWhth.

baseline_emission_factor

Baseline emission factor in tCO2e/MWhth.

project_emission_factor

Optional project emission factor in tCO2e/MWhth.

group_cols

Optional character vector specifying grouping columns in thermal_data.

Value

Tibble with baseline thermal output, baseline emissions, project emissions, and emission reductions.

Examples

thermal <- tibble::tibble(facility_id = c("A", "B"), thermal_energy_mwh = c(800, 620))
estimate_emission_reductions_ams_ic(thermal, baseline_emission_factor = 0.25)
#> # A tibble: 1 × 4
#>   baseline_thermal_output_mwh baseline_emissions_tco2e project_emissions_tco2e
#>                         <dbl>                    <dbl>                   <dbl>
#> 1                        1420                      355                       0
#> # ℹ 1 more variable: emission_reductions_tco2e <dbl>