Monitoring aggregation and reporting helpers for ACM0019

Wrappers that aggregate monitoring data and calculate total emission reductions for ACM0019 nitric acid projects.

aggregate_monitoring_periods_acm0019(monitoring_data)

estimate_emission_reductions_acm0019(monitoring_data)

Arguments

monitoring_data

Tibble containing period identifiers, production, emission factors, and auxiliary energy use.

Value

Tibbles summarising period-level or total emission results.

Examples

monitoring <- simulate_acm0019_dataset(4, seed = 99)
aggregate_monitoring_periods_acm0019(monitoring)
#> # A tibble: 4 × 12
#>   period production_tonnes baseline_ef_kg_per_tonne project_ef_kg_per_tonne
#>   <fct>              <dbl>                    <dbl>                   <dbl>
#> 1 P1                44442.                     9.57                    1.19
#> 2 P2                43594.                     9.58                    1.22
#> 3 P3                45321.                     9.27                    1.22
#> 4 P4                44183.                     9.51                    1.16
#> # ℹ 8 more variables: electricity_mwh <dbl>, grid_ef_t_per_mwh <dbl>,
#> #   steam_tonnes <dbl>, steam_ef_t_per_tonne <dbl>, baseline_emissions <dbl>,
#> #   project_emissions <dbl>, leakage_emissions <dbl>,
#> #   net_emission_reductions <dbl>
estimate_emission_reductions_acm0019(monitoring)
#> # A tibble: 1 × 5
#>   total_production_tonnes total_baseline_emissions total_project_emissions
#>                     <dbl>                    <dbl>                   <dbl>
#> 1                 177540.                  446160.                  56281.
#> # ℹ 2 more variables: total_leakage_emissions <dbl>,
#> #   total_net_emission_reductions <dbl>