Convert recovered methane volumes into destroyed emissions

Transform monitored methane recovery volumes into destroyed emissions expressed in tCO2e.

calculate_recovered_methane_iiid(
  data,
  methane_recovered_col = "methane_recovered_m3",
  destruction_efficiency_col = "destruction_efficiency_fraction",
  group_cols = NULL,
  output_col = "recovered_methane_tco2e",
  methane_density_t_per_m3 = 0.00067,
  gwp_ch4 = 28
)

Arguments

data

Tibble containing methane recovery monitoring data.

methane_recovered_col

Column storing methane recovered in cubic metres.

destruction_efficiency_col

Column storing the fraction of recovered methane destroyed.

group_cols

Optional character vector specifying grouping columns.

output_col

Name of the output column for destroyed methane.

methane_density_t_per_m3

Density of methane in tonnes per cubic metre.

gwp_ch4

Global warming potential of methane.

Value

Tibble containing grouped totals of destroyed methane in tCO2e.

Examples

recovery <- tibble::tibble(
  digester_id = c("D1", "D2"),
  methane_recovered_m3 = c(15000, 12000),
  destruction_efficiency_fraction = c(0.99, 0.98)
)
calculate_recovered_methane_iiid(recovery, group_cols = "digester_id")
#> # A tibble: 2 × 2
#>   digester_id recovered_methane_tco2e
#>   <chr>                         <dbl>
#> 1 D1                             279.
#> 2 D2                             221.