calc_primary_energy: Calculate the primary energy embodied in the feed supplied to...

In EnergyEconomyDecoupling/MWTools: Functions For Calculation of Muscle Work Within the PSUT Framework

Calculate the primary energy embodied in the feed supplied to working animals

Description

Calculate the primary energy embodied in the feed supplied to working animals

Usage

calc_primary_energy(
  .df,
  harvest_waste = 0.45,
  final_energy_total = MWTools::amw_analysis_constants$final_energy_total,
  final_energy_ag = MWTools::amw_analysis_constants$final_energy_ag,
  final_energy_tr = MWTools::amw_analysis_constants$final_energy_tr,
  primary_energy_total = MWTools::amw_analysis_constants$primary_energy_total,
  primary_energy_ag = MWTools::amw_analysis_constants$primary_energy_ag,
  primary_energy_tr = MWTools::amw_analysis_constants$primary_energy_tr
)

Arguments

.df	A data frame containing the final energy consumption of working animals. Usually produced by calling the tidy_fao_live_animals, add_concordance_codes, trim_fao_data, get_working_species, calc_working_animals, calc_sector_split, calc_yearly_feed, and calc_final_energy functions in sequence on the raw FAO data.
harvest_waste	The proportion of energy embodied in biomass wasted when animal feed is harvested.
final_energy_total, final_energy_ag, final_energy_tr, primary_energy_total, primary_energy_ag, primary_energy_tr	See MWTools::amw_analysis_constants.

Examples

working_animals_data <- read.csv(file = MWTools::amw_test_data_path()) %>%
  tidy_fao_live_animals() %>%
  add_concordance_codes() %>%
  trim_fao_data() %>%
  get_working_species() %>%
  calc_working_animals() %>%
  calc_sector_split() %>%
  calc_yearly_feed() %>%
  calc_final_energy() %>%
  calc_primary_energy()

EnergyEconomyDecoupling/MWTools documentation built on April 14, 2025, 9:27 a.m.