Meta-functions that simulate ACM0010 data, estimate emissions, and aggregate results.

aggregate_monitoring_periods_acm0010(data, period_col = "period")

estimate_emission_reductions_acm0010(data, gwp_ch4 = 28, methane_density = 0.0007168)

simulate_acm0010_dataset(periods = 12, seed = NULL)

Arguments

data

Tibble of monitoring observations or emission results.

period_col

Name of the period column to aggregate by.

gwp_ch4

Global warming potential for methane.

methane_density

Density of methane in tonnes per cubic metre.

periods

Number of monitoring periods to simulate.

seed

Optional seed for reproducibility.

Value

aggregate_monitoring_periods_acm0010() and estimate_emission_reductions_acm0010() return tibbles and lists; simulate_acm0010_dataset() returns a tibble of simulated monitoring data.

Examples

monitoring <- simulate_acm0010_dataset(periods = 3, seed = 12)
results <- estimate_emission_reductions_acm0010(monitoring)
aggregate_monitoring_periods_acm0010(results$period_results)
#> # A tibble: 3 × 5
#>   period baseline_emissions_tco2e project_emissions_tco2e leakage_emissions_tc…¹
#>    <int>                    <dbl>                   <dbl>                  <dbl>
#> 1      1                     2.25                   1.69                    9.16
#> 2      2                     3.13                   1.60                   17.8 
#> 3      3                     2.66                   0.665                   8.84
#> # ℹ abbreviated name: ¹​leakage_emissions_tco2e
#> # ℹ 1 more variable: net_emission_reductions_tco2e <dbl>