Applies Equation (2) of AMS-I.C by multiplying baseline thermal output by the baseline emission factor representing displaced fossil heat production.

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

Arguments

baseline_output

A tibble produced by calculate_baseline_thermal_output().

baseline_emission_factor

Baseline emission factor in tCO2e/MWhth. Provide either a single value applied to all rows or a vector matching the number of rows in baseline_output.

output_col

Name of the resulting emission column.

Value

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

Examples

output <- tibble::tibble(baseline_thermal_output_mwh = c(500, 620))
calculate_baseline_emissions(output, baseline_emission_factor = 0.25)
#> Error: `useful_output` must contain `useful_thermal_output_mwh`.