Calculate net emission reductions for AMS-III.D

Combine baseline, project, recovered, and leakage emission totals to obtain net emission reductions in tCO2e.

calculate_emission_reductions_iiid(
  baseline,
  project,
  recovered,
  leakage,
  group_cols = NULL,
  output_col = "emission_reductions_tco2e"
)

Arguments

baseline

Tibble returned by calculate_baseline_methane_emissions_iiid().

project

Tibble returned by calculate_project_methane_emissions_iiid().

recovered

Tibble returned by calculate_recovered_methane_iiid().

leakage

Tibble returned by calculate_leakage_emissions_iiid().

group_cols

Character vector specifying grouping columns.

output_col

Name of the emission reduction output column.

Value

Tibble containing emission reductions per group.

Examples

baseline <- tibble::tibble(farm_id = "A", baseline_emissions_tco2e = 100)
project <- tibble::tibble(farm_id = "A", project_emissions_tco2e = 20)
recovered <- tibble::tibble(farm_id = "A", recovered_methane_tco2e = 60)
leakage <- tibble::tibble(farm_id = "A", leakage_emissions_tco2e = 5)
calculate_emission_reductions_iiid(baseline, project, recovered, leakage, group_cols = "farm_id")
#> # A tibble: 1 × 2
#>   farm_id emission_reductions_tco2e
#>   <chr>                       <dbl>
#> 1 A                             135