Equation (3) of AMS-II.E accounts for leakage linked to upstream fuel supply, equipment disposal, or other market effects.

calculate_leakage_emissions(
  leakage_data,
  leakage_col = "leakage_emissions_tco2e",
  group_cols = NULL,
  output_col = "leakage_emissions_tco2e"
)

Arguments

leakage_data

A tibble containing leakage components expressed in tCO2e.

leakage_col

Column storing leakage emission quantities.

group_cols

Optional character vector of grouping variables to retain.

output_col

Name of the resulting column storing leakage totals.

Value

A tibble with leakage totals.

Examples

leakage <- tibble::tibble(building_id = c("Office_A", "Office_B"),
                          leakage_emissions_tco2e = c(2.1, 1.5))
calculate_leakage_emissions(leakage, group_cols = "building_id")
#> # A tibble: 2 × 2
#>   building_id leakage_emissions_tco2e
#>   <chr>                         <dbl>
#> 1 Office_A                        2.1
#> 2 Office_B                        1.5