Implements Equation (1) of AMS-I.B by converting baseline fossil fuel consumption into energy delivered to the mechanical equipment.

calculate_baseline_energy_content(
  fuel_data,
  consumption_col = "fuel_consumption",
  ncv_col = "net_calorific_value",
  group_cols = NULL,
  output_col = "baseline_energy_mj"
)

Arguments

fuel_data

A tibble containing the baseline fuel consumption observations.

consumption_col

Name of the column storing fuel consumption (e.g. litres, kg).

ncv_col

Name of the column storing net calorific value in MJ per unit of fuel.

group_cols

Optional character vector of grouping columns used to aggregate energy content.

output_col

Name of the resulting column containing baseline energy in MJ.

Value

A tibble containing grouping columns (if supplied) and a column named output_col with baseline energy in MJ.

Examples

data <- tibble::tibble(machine_id = c("pump-1", "pump-1", "mill-3"),
                       fuel_consumption = c(200, 180, 150),
                       net_calorific_value = c(43, 43, 42))
calculate_baseline_energy_content(data)
#> Error: `biomass_col` must be present in `non_renewable_biomass`.