Applies Equation (2) of AMS-I.D by multiplying baseline electricity supply by the baseline emission factor representing displaced fossil-based electricity generation.

calculate_baseline_emissions(baseline_supply, baseline_emission_factor, output_col = "baseline_emissions_tco2e")

Arguments

baseline_supply

Tibble produced by calculate_baseline_electricity_supply().

baseline_emission_factor

Baseline emission factor in tCO2e/MWh.

output_col

Name of the resulting emission column.

Value

The input tibble with a column containing baseline emissions in tCO2e.

Examples

supply <- tibble::tibble(baseline_electricity_mwh = c(400, 520))
calculate_baseline_emissions(supply, baseline_emission_factor = 0.72)
#> Error: `useful_output` must contain `useful_thermal_output_mwh`.