Aggregate monitoring periods for AMS-III.H

Aggregates period-level emissions outputs and counts distinct monitoring periods per grouping combination.

aggregate_monitoring_periods_iiih(
  data,
  group_cols,
  monitoring_col = "monitoring_period"
)

Arguments

data

Tibble containing period-level emissions.

group_cols

Character vector identifying grouping columns.

monitoring_col

Column storing the monitoring period identifier.

Value

Tibble summarising emissions by group with monitoring period counts.

Examples

period_results <- tibble::tibble(
  site_id = rep("WW1", 2),
  period = 1:2,
  baseline_emissions_tco2e = c(1500, 1480),
  project_emissions_tco2e = c(420, 410),
  leakage_emissions_tco2e = c(30, 28)
)
aggregate_monitoring_periods_iiih(period_results, group_cols = "site_id", monitoring_col = "period")
#> # A tibble: 1 × 5
#>   site_id monitoring_periods baseline_emissions_tco2e project_emissions_tco2e
#>   <chr>                <int>                    <dbl>                   <dbl>
#> 1 WW1                      2                     2980                     830
#> # ℹ 1 more variable: leakage_emissions_tco2e <dbl>