Calculate the number of working animals — calc_working

Calculate the number of working animals using data for the number of live animals from the FAO, and user-supplied data for the proportion of working animals by region and year.

Usage

calc_working_animals(
  .df,
  amw_analysis_data_path = MWTools::amw_analysis_data_path(),
  year = MWTools::mw_cols$year,
  species = MWTools::mw_constants$species,
  exemplar_method_col = MWTools::mw_constants$exemplar_method_col,
  prop_working_animals_col = MWTools::amw_analysis_constants$prop_working_animals_col,
  wa_perc_sheet = MWTools::amw_analysis_constants$wa_perc_sheet,
  working_animals_total_col = MWTools::amw_analysis_constants$working_animals_total_col,
  live_animals_col = MWTools::amw_analysis_constants$live_animals_col,
  amw_region_code_col = MWTools::conc_cols$amw_region_code_col,
  amw_region_col = MWTools::amw_analysis_constants$amw_region_col
)

Arguments

.df: A data frame containing the number of live animals for working species. Usually produced by calling the tidy_fao_live_animals, add_concordance_codes, trim_fao_data, and get_working_species functions in sequence on the raw FAO data.
amw_analysis_data_path: The path to the animal muscle work analysis data, containing data for the proportion of working animals by species, country, and over time. Set to the function MWTools::amw_analysis_data_path(), by default, which returns the path the analysis data bundled with the MWTools package.
year, species, exemplar_method_col: See MWTools::mw_constants.
prop_working_animals_col, wa_perc_sheet, working_animals_total_col, live_animals_col, amw_region_col: See MWTools::amw_analysis_constants.
amw_region_code_col: See MWTools::conc_cols.

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()