Equation (4) of AMS-II.H determines emission reductions by subtracting project and leakage emissions from baseline totals. This helper accepts pre-computed components and performs the subtraction consistently across grouped datasets.

calculate_emission_reductions_iih(
  baseline_emissions,
  project_emissions,
  leakage_emissions = NULL,
  group_cols = NULL,
  output_col = "emission_reductions_tco2e"
)

Arguments

baseline_emissions

Tibble containing baseline emissions with one row per group.

project_emissions

Tibble containing total project emissions (central plus auxiliary) with one row per group.

leakage_emissions

Optional tibble containing leakage emissions in tCO2e.

group_cols

Optional character vector of grouping columns shared across the inputs.

output_col

Name of the emission reduction column to create.

Value

A tibble containing net emission reductions in tCO2e.

Examples

baseline <- tibble::tibble(line = c("A", "B"), baseline_emissions_tco2e = c(12, 9))
project <- tibble::tibble(line = c("A", "B"), project_emissions_tco2e = c(6.4, 5.1))
leakage <- tibble::tibble(line = c("A", "B"), leakage_emissions_tco2e = c(0.2, 0.1))
calculate_emission_reductions_iih(baseline, project, leakage, group_cols = "line")
#> # A tibble: 2 × 5
#>   line  baseline_emissions_tco2e project_emissions_tco2e leakage_emissions_tco2e
#>   <chr>                    <dbl>                   <dbl>                   <dbl>
#> 1 A                           12                     6.4                     0.2
#> 2 B                            9                     5.1                     0.1
#> # ℹ 1 more variable: emission_reductions_tco2e <dbl>