From 8b197e52093d22c1721190072f41ee91be147b89 Mon Sep 17 00:00:00 2001 From: lilyclements Date: Tue, 3 Dec 2024 21:51:09 +0000 Subject: [PATCH 1/3] updating emissions on waste disposal and material use for clarity --- DESCRIPTION | 2 +- R/electrical_emissions.R | 88 +++++++---- R/household_emissions.R | 108 ++++++------- R/metal_emissions.R | 42 +++-- R/paper_emissions.R | 32 ++-- R/plastic_emissions.R | 53 ++++--- man/carbonr.Rd | 2 +- man/clinical_theatre_data.Rd | 56 +++---- man/clinical_theatre_emissions.Rd | 56 +++---- man/electrical_emissions.Rd | 76 ++++++--- man/household_emissions.Rd | 250 +++++++++++++++++------------- man/material_emissions.Rd | 119 ++++++++------ man/metal_emissions.Rd | 39 +++-- man/paper_emissions.Rd | 29 +++- man/plastic_emissions.Rd | 50 +++--- 15 files changed, 591 insertions(+), 411 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 81c34a9..dd91cd7 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -8,7 +8,7 @@ Description: Provides a flexible tool for calculating carbon-equivalent emission License: LGPL (>= 3) Encoding: UTF-8 Roxygen: list(markdown = TRUE) -RoxygenNote: 7.2.3 +RoxygenNote: 7.3.2 Suggests: knitr, purrr, diff --git a/R/electrical_emissions.R b/R/electrical_emissions.R index eaddad7..c5e1107 100644 --- a/R/electrical_emissions.R +++ b/R/electrical_emissions.R @@ -2,28 +2,52 @@ #' #' This function calculates the emissions produced from different electrical items and their waste disposal based on the specified inputs. It considers emissions from primary material production and waste disposal of electrical items. #' -#' @param fridges Numeric value indicating the weight of fridges. Default is `0`. -#' @param freezers Numeric value indicating the weight of freezers. Default is `0`. -#' @param large Numeric value indicating the weight of large electrical items. Default is `0`. -#' @param IT Numeric value indicating the weight of IT (Information Technology) equipment. Default is `0`. -#' @param small Numeric value indicating the weight of small electrical items. Default is `0`. -#' @param alkaline_batteries Numeric value indicating the weight of alkaline batteries. Default is `0`. -#' @param LiIon_batteries Numeric value indicating the weight of Lithium-ion batteries. Default is `0`. -#' @param NiMh_batteries Numeric value indicating the weight of Nickel Metal Hydride batteries. Default is `0`. -#' @param fridges_WD Numeric value indicating the weight of fridges disposed of using waste disposal methods. Default is `0`. -#' @param freezers_WD Numeric value indicating the weight of freezers disposed of using waste disposal methods. Default is `0`. -#' @param large_WD Numeric value indicating the weight of large electrical items disposed of using waste disposal methods. Default is `0`. -#' @param IT_WD Numeric value indicating the weight of IT equipment disposed of using waste disposal methods. Default is `0`. -#' @param small_WD Numeric value indicating the weight of small electrical items disposed of using waste disposal methods. Default is `0`. -#' @param alkaline_batteries_WD Numeric value indicating the weight of alkaline batteries disposed of using waste disposal methods. Default is `0`. -#' @param LiIon_batteries_WD Numeric value indicating the weight of Lithium-ion batteries disposed of using waste disposal methods. Default is `0`. -#' @param NiMh_batteries_WD Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using waste disposal methods. Default is `0`. -#' @param waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: `"Landfill"`, `"Open-loop"`. Default is `"Landfill"`. +#' @param fridges Numeric value indicating the weight of fridges purchased. Default is `0`. +#' @param freezers Numeric value indicating the weight of freezers purchased. Default is `0`. +#' @param large_electrical Numeric value indicating the weight of large electrical items purchased. Default is `0`. +#' @param IT Numeric value indicating the weight of IT (Information Technology) equipment purchased. Default is `0`. +#' @param small_electrical Numeric value indicating the weight of small electrical items purchased. Default is `0`. +#' @param alkaline_batteries Numeric value indicating the weight of alkaline batteries purchased. Default is `0`. An alkaline AA battery typically weighs around 23 grams (0.023kg). +#' These are non-rechargeable batteries, used in: +#' * Day-to-day gadgets: Such as alarm clocks, electric shavers, remote controls, and radios +#' * Low-drain applications: Such as flashlights, portable radios, alarm clocks, remote controls, and toys +#' * Audiovisual equipment: Such as still digital cameras, strobe cameras, and portable liquid crystal TVs +#' * Game equipment: Such as game controllers and walkie talkies +#' * Other: Such as hearing aids and mosquito repellant devices +#' @param NiMh_batteries Numeric value indicating the weight of Nickel Metal Hydride batteries purchased. Default is `0`. A Nickel Metal Hydride AA battery typically weighs around 31 grams (0.031kg). +#' These tend to be rechargeable and found in: +#' * Portable devices: digital cameras, MP3 players, and GPS units. +#' * Vehicles: Hybrid and electric vehicles +#' * Power tools +#' * Other: medical instruments, toothbrushes, electric razors, and mobile phones. +#' @param LiIon_batteries Numeric value indicating the weight of Lithium-ion batteries purchased. Default is `0`. +#' Lithium-Ion batteries are often rechargeable and found in: +#' * Electronics: Cell phones, tablets, laptops, digital cameras, watches, and personal digital assistants +#' * Vehicles: Electric vehicles, E-bikes, hoverboards, and scooters +#' * Tools: Electric toothbrushes and other tools +#' * Power backup: Solar power backup storage, uninterrupted power supply (UPS), and emergency power backup +#' * Other: Pacemakers, toys, and clocks +#' @param fridges_WD Numeric value indicating the weight of fridges disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param freezers_WD Numeric value indicating the weight of freezers disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param large_electrical_WD Numeric value indicating the weight of large electrical items disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param IT_WD Numeric value indicating the weight of IT equipment disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param small_electrical_WD Numeric value indicating the weight of small electrical items disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param alkaline_batteries_WD Numeric value indicating the weight of alkaline batteries disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param NiMh_batteries_WD Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param LiIon_batteries_WD Numeric value indicating the weight of Lithium-ion batteries disposed of using the waste disposal method given in `electric_waste_disposal`. Default is `0`. +#' @param electric_waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: `"Landfill"`, `"Open-loop"`. Default is `"Landfill"`. #' `"Open-loop"` is the process of recycling material into other products. #' `"Landfill"` the product goes to landfill after use. #' @param units Character vector specifying the units of the emissions output. Possible values: `"kg"`, `"tonnes"`. Default is `"kg"`. #' #' @return The calculated electrical emissions as a numeric value in tonnes. +#' +#' @details +#' Note on the Material Use and Waste Disposal from the Government UK Report 2024: +#' "Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +#' "The conversion factors presented for material consumption cover [...] emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." +#' +#' "Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." #' #' @export #' @@ -34,28 +58,28 @@ #' # Calculate electrical emissions with specific quantities and waste disposal #' # method #' electrical_emissions(fridges = 10, IT = 5, alkaline_batteries = 100, -#' waste_disposal = "Open-loop", units = "tonnes") -electrical_emissions <- function(fridges = 0, freezers = 0, large = 0, IT = 0, small = 0, +#' electric_waste_disposal = "Open-loop", units = "tonnes") +electrical_emissions <- function(fridges = 0, freezers = 0, large_electrical = 0, IT = 0, small_electrical = 0, alkaline_batteries = 0, LiIon_batteries = 0, NiMh_batteries = 0, - fridges_WD = 0, freezers_WD = 0, large_WD = 0, IT_WD = 0, - small_WD = 0, alkaline_batteries_WD = 0, LiIon_batteries_WD = 0, - NiMh_batteries_WD = 0, waste_disposal = c("Landfill", "Open-loop"), + fridges_WD = 0, freezers_WD = 0, large_electrical_WD = 0, IT_WD = 0, + small_electrical_WD = 0, alkaline_batteries_WD = 0, LiIon_batteries_WD = 0, + NiMh_batteries_WD = 0, electric_waste_disposal = c("Landfill", "Open-loop"), units = c("kg", "tonnes")){ - waste_disposal <- match.arg(waste_disposal) + electric_waste_disposal <- match.arg(electric_waste_disposal) units <- match.arg(units) checkmate::assert_numeric(fridges, lower = 0) checkmate::assert_numeric(freezers, lower = 0) - checkmate::assert_numeric(large, lower = 0) + checkmate::assert_numeric(large_electrical, lower = 0) checkmate::assert_numeric(IT, lower = 0) - checkmate::assert_numeric(small, lower = 0) + checkmate::assert_numeric(small_electrical, lower = 0) checkmate::assert_numeric(alkaline_batteries, lower = 0) checkmate::assert_numeric(LiIon_batteries, lower = 0) checkmate::assert_numeric(NiMh_batteries, lower = 0) checkmate::assert_numeric(fridges_WD, lower = 0) checkmate::assert_numeric(freezers_WD, lower = 0) - checkmate::assert_numeric(large_WD, lower = 0) + checkmate::assert_numeric(large_electrical_WD, lower = 0) checkmate::assert_numeric(IT_WD, lower = 0) - checkmate::assert_numeric(small_WD, lower = 0) + checkmate::assert_numeric(small_electrical_WD, lower = 0) checkmate::assert_numeric(alkaline_batteries_WD, lower = 0) checkmate::assert_numeric(LiIon_batteries_WD, lower = 0) checkmate::assert_numeric(NiMh_batteries_WD, lower = 0) @@ -69,14 +93,14 @@ electrical_emissions <- function(fridges = 0, freezers = 0, large = 0, IT = 0, s WD <- uk_gov_data %>% dplyr::filter(`Level 1` == "Waste disposal") %>% dplyr::filter(`Level 2` == "Electrical items") %>% - dplyr::filter(`Column Text` == waste_disposal) + dplyr::filter(`Column Text` == electric_waste_disposal) emission_values <- MU$value WD_values <- WD$value - electrical_emissions <- fridges*emission_values[1] + freezers*emission_values[1] + large*emission_values[2] + - IT*emission_values[3] + small*emission_values[4] + alkaline_batteries*emission_values[5] + + electrical_emissions <- fridges*emission_values[1] + freezers*emission_values[1] + large_electrical*emission_values[2] + + IT*emission_values[3] + small_electrical*emission_values[4] + alkaline_batteries*emission_values[5] + LiIon_batteries*emission_values[6] + NiMh_batteries*emission_values[7] + - fridges_WD*WD_values[1] + freezers_WD*WD_values[1] + large_WD*WD_values[2] + - IT_WD*WD_values[3] + small_WD*WD_values[4] + alkaline_batteries_WD*WD_values[5] + + fridges_WD*WD_values[1] + freezers_WD*WD_values[1] + large_electrical_WD*WD_values[2] + + IT_WD*WD_values[3] + small_electrical_WD*WD_values[4] + alkaline_batteries_WD*WD_values[5] + LiIon_batteries_WD*WD_values[5] + NiMh_batteries_WD*WD_values[5] if (units == "kg") electrical_emissions <- electrical_emissions * 0.001 return(electrical_emissions) diff --git a/R/household_emissions.R b/R/household_emissions.R index 49c40fc..6e085b2 100644 --- a/R/household_emissions.R +++ b/R/household_emissions.R @@ -1,34 +1,27 @@ #' Calculate household material emissions -#' -#' @inheritParams paper_emissions -#' @inheritParams plastic_emissions -#' @inheritParams metal_emissions -#' @inheritParams electrical_emissions -#' @param glass Numeric value representing the amount of glass. Default is `0`. -#' @param clothing Numeric value representing the amount of clothing. Default is `0`. -#' @param food Numeric value representing the amount of food. Default is `0`. -#' @param drink Numeric value representing the amount of drink. Default is `0`. -#' @param compost_from_garden Numeric value representing the amount of compost from garden waste. Default is `0`. -#' @param compost_from_food_and_garden Numeric value representing the amount of compost from food and garden waste. Default is `0`. -#' @param glass_WD Numeric value representing the amount of glass waste with disposal. Default is `0`. -#' @param books_WD Numeric value representing the amount of books waste with disposal. Default is `0`. -#' @param clothing_WD Numeric value representing the amount of clothing waste with disposal. Default is `0`. -#' @param gcb_waste_disposal Character value specifying the waste disposal method for glass, clothing, and books waste (options: `"Closed-loop"`, `"Combustion"`, `"Landfill"`). Default is `"Closed-loop"`. See `details` for more information. -#' @param household_residual_waste Numeric value representing the amount of household residual waste. Default is `0`. +#' +#' @param household_residual_waste Numeric value representing the amount of household residual waste. Household Residual Waste refers to waste that remains after all recyclable, compostable, and reusable materials have been removed through household recycling, composting, or other waste management activities. This type of waste is typically disposed of through methods such as landfill or incineration and often includes non-recyclable items. Default is `0`. #' @param hh_waste_disposal Character value specifying the waste disposal method for waste (options: `"Combustion"`, `"Landfill"`). Default is `"Combustion"`. See `details` for more information. -#' @param food_WD Numeric value indicating the weight of food disposed of using waste disposal methods. Default is `0`. -#' @param drink_WD Numeric value indicating the weight of drink disposed of using waste disposal methods. Default is `0`. +#' @param glass Numeric value representing the amount of glass material purchased. Default is `0`. +#' @param clothing Numeric value representing the amount of clothing material purchased. Default is `0`. +#' @param glass_WD Numeric value representing the amount of glass waste disposed. Default is `0`. +#' @param clothing_WD Numeric value representing the amount of clothing waste disposed. Default is `0`. +#' @param books_WD Numeric value representing the amount of books waste disposed. Default is `0`. +#' @param gcb_waste_disposal Character value specifying the waste disposal method for glass, clothing, and books waste (options: `"Closed-loop"`, `"Combustion"`, `"Landfill"`). Default is `"Closed-loop"`. See `details` for more information. +#' @param food Numeric value representing the amount of food purchased. Default is `0`. +#' @param drink Numeric value representing the amount of drink purchased. Default is `0`. +#' @param compost_from_garden Numeric value representing the amount of compost from garden waste purchased. Default is `0`. +#' @param compost_from_food_and_garden Numeric value representing the amount of compost from food and garden waste purchased. Default is `0`. +#' @param food_WD Numeric value indicating the weight of organic food disposed of using waste disposal methods given in `compost_waste_disposal`. Default is `0`. +#' @param drink_WD Numeric value indicating the weight of organic drink disposed of using the waste disposal method given in `compost_waste_disposal`. Default is `0`. #' @param compost_from_garden_WD Numeric value indicating the weight of compost from garden waste disposed of using waste disposal methods. Default is `0`. #' @param compost_from_food_and_garden_WD Numeric value indicating the weight of compost from garden and food waste disposed of using waste disposal methods. Default is `0`. -#' @param large_electrical Numeric value indicating the weight of large electrical items. Default is `0`. -#' @param small_electrical Numeric value indicating the weight of small electrical items. Default is `0`. -#' @param large_electrical_WD Numeric value indicating the weight of large electrical items disposed of using waste disposal methods. Default is `0`. -#' @param small_electrical_WD Numeric value indicating the weight of small electrical items disposed of using waste disposal methods. Default is `0`. #' @param compost_waste_disposal Character value specifying the waste disposal method for compost waste (options: `"Anaerobic digestion"`, `"Combustion"`, `"Composting"`, `"Landfill"`). Default is `"Anaerobic digestion"`. See `details` for more information. -#' @param metal_waste_disposal Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". See `details` for more information. -#' @param paper_waste_disposal Character vector specifying the waste disposal method for paper to use for calculating emissions. Possible values: `"Closed-loop"`, `"Combustion"`, `"Composting"`, `"Landfill"`. Default is `"Closed-loop"`. See `details` for more information. -#' @param electric_waste_disposal Character vector specifying the waste disposal method for electrical items to use for calculating emissions. Possible values: `"Landfill"`, `"Open-loop"`. Default is `"Landfill"`. See `details` for more information. -#' @param units Character vector specifying the units of the emissions output. Possible values: `"kg"`, `"tonnes"`. Default is `"kg"`. +#' @inheritParams paper_emissions +#' @inheritParams electrical_emissions +#' @inheritParams metal_emissions +#' @inheritParams plastic_emissions +#' @param units Character vector specifying the units of the emissions. Possible values: `"kg"`, `"tonnes"`. Default is `"kg"`. #' #' @return The calculated household emissions as a numeric value in tonnes. #' @export @@ -40,37 +33,36 @@ #' `"Compost"` CO2e emitted as a result of composting a waste stream. #' `"Landfill"` the product goes to landfill after use. #' `"Anaerobic digestion"` energy is recovered from the waste through anaerobic digestion. +#' +#' Note on the Material Use and Waste Disposal from the Government UK Report 2024: +#' "Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +#' "The conversion factors presented for material consumption cover [...] emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." +#' +#' "Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." #' #' @examples #' household_emissions(glass = 100, clothing = 10, glass_WD = 10, units = "kg") -household_emissions <- function(glass = 0, clothing = 0, food = 0, drink = 0, compost_from_garden = 0, - compost_from_food_and_garden = 0, board = 0, mixed = 0, paper = 0, - fridges = 0, freezers = 0, large_electrical = 0, IT = 0, small_electrical = 0, - alkaline_batteries = 0, LiIon_batteries = 0, NiMh_batteries = 0, - aluminuim_cans = 0, aluminuim_foil = 0, mixed_cans = 0, scrap = 0, steel_cans = 0, - average = 0, average_film = 0, average_rigid = 0, HDPE = 0, - LDPE = 0, LLDPE = 0, PET = 0, PP = 0, PS = 0, PVC = 0, - glass_WD = 0, books_WD = 0, clothing_WD = 0, - gcb_waste_disposal = c("Closed-loop", "Combustion", "Landfill"), - household_residual_waste = 0, hh_waste_disposal = c("Combustion", "Landfill"), - food_WD = 0, drink_WD = 0, - compost_from_garden_WD = 0, - compost_from_food_and_garden_WD = 0, compost_waste_disposal = c("Anaerobic digestion", "Combustion", "Composting", "Landfill"), - aluminuim_cans_WD = 0, aluminuim_foil_WD = 0, - mixed_cans_WD = 0, scrap_WD = 0, steel_cans_WD = 0, - metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), - board_WD = 0, mixed_WD = 0, paper_WD = 0, - paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), - average_WD = 0, average_film_WD = 0, average_rigid_WD = 0, HDPE_WD = 0, - LDPE_WD = 0, LLDPE_WD = 0, PET_WD = 0, PP_WD = 0, PS_WD = 0, PVC_WD = 0, - fridges_WD = 0, freezers_WD = 0, large_electrical_WD = 0, IT_WD = 0, - small_electrical_WD = 0, alkaline_batteries_WD = 0, LiIon_batteries_WD = 0, - NiMh_batteries_WD = 0, electric_waste_disposal = c("Landfill", "Open-loop"), - units = c("kg", "tonnes")){ +household_emissions <- function(household_residual_waste = 0, hh_waste_disposal = c("Combustion", "Landfill"), + glass = 0, clothing = 0, glass_WD = 0, clothing_WD = 0,books_WD = 0, gcb_waste_disposal = c("Closed-loop", "Combustion", "Landfill"), + food = 0, drink = 0, compost_from_garden = 0, compost_from_food_and_garden = 0, food_WD = 0, drink_WD = 0, compost_from_garden_WD = 0, + compost_from_food_and_garden_WD = 0, compost_waste_disposal = c("Anaerobic digestion", "Combustion", "Composting", "Landfill"), + board = 0, mixed = 0, paper = 0, board_WD = 0, mixed_WD = 0, paper_WD = 0, paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), + fridges = 0, freezers = 0, large_electrical = 0, IT = 0, small_electrical = 0, alkaline_batteries = 0, LiIon_batteries = 0, NiMh_batteries = 0, + fridges_WD = 0, freezers_WD = 0, large_electrical_WD = 0, IT_WD = 0, small_electrical_WD = 0, alkaline_batteries_WD = 0, LiIon_batteries_WD = 0, + NiMh_batteries_WD = 0, electric_waste_disposal = c("Landfill", "Open-loop"), + aluminuim_cans = 0, aluminuim_foil = 0, mixed_cans = 0, scrap = 0, steel_cans = 0, + aluminuim_cans_WD = 0, aluminuim_foil_WD = 0, mixed_cans_WD = 0, scrap_WD = 0, steel_cans_WD = 0, + metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + average = 0, average_film = 0, average_rigid = 0, HDPE = 0, LDPE = 0, LLDPE = 0, PET = 0, PP = 0, PS = 0, PVC = 0, + average_WD = 0, average_film_WD = 0, average_rigid_WD = 0, HDPE_WD = 0, LDPE_WD = 0, LLDPE_WD = 0, PET_WD = 0, PP_WD = 0, PS_WD = 0, PVC_WD = 0, + plastic_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + + units = c("kg", "tonnes")){ gcb_waste_disposal <- match.arg(gcb_waste_disposal) hh_waste_disposal <- match.arg(hh_waste_disposal) compost_waste_disposal <- match.arg(compost_waste_disposal) + plastic_waste_disposal <- match.arg(plastic_waste_disposal) units <- match.arg(units) checkmate::assert_numeric(glass, lower = 0) checkmate::assert_numeric(clothing, lower = 0) @@ -91,21 +83,21 @@ household_emissions <- function(glass = 0, clothing = 0, food = 0, drink = 0, co mixed_cans = mixed_cans, scrap = scrap, steel_cans = steel_cans, aluminuim_cans_WD = aluminuim_cans_WD, aluminuim_foil_WD = aluminuim_foil_WD, mixed_cans_WD = mixed_cans_WD, scrap_WD = scrap_WD, steel_cans_WD = steel_cans_WD, - waste_disposal = metal_waste_disposal, units = units) + metal_waste_disposal = metal_waste_disposal, units = units) paper_emissions <- paper_emissions(board = board, mixed = mixed, paper = paper, board_WD = board_WD, mixed_WD = mixed_WD, paper_WD = paper_WD, - waste_disposal = paper_waste_disposal, units = units) + paper_waste_disposal = paper_waste_disposal, units = units) plastic_emissions <- plastic_emissions(average = average, average_film = average_film, average_rigid = average_rigid, HDPE = HDPE, LDPE = LDPE, LLDPE = LLDPE, PET = PET, PP = PP, PS = PS, PVC = PVC, average_WD = average_WD, average_film_WD = average_film_WD, average_rigid_WD = average_rigid_WD, HDPE_WD = HDPE_WD, LDPE_WD = LDPE_WD, LLDPE_WD = LLDPE_WD, PET_WD = PET_WD, PP_WD = PP_WD, - PS_WD = PS_WD, PVC_WD = PVC_WD, units = units) - electrical_emissions <- electrical_emissions(fridges = fridges, freezers = freezers, large = large_electrical, IT = IT, - small = small_electrical, alkaline_batteries = alkaline_batteries, + PS_WD = PS_WD, PVC_WD = PVC_WD, plastic_waste_disposal = plastic_waste_disposal, units = units) + electrical_emissions <- electrical_emissions(fridges = fridges, freezers = freezers, large_electrical = large_electrical, IT = IT, + small_electrical = small_electrical, alkaline_batteries = alkaline_batteries, LiIon_batteries = LiIon_batteries, NiMh_batteries = NiMh_batteries, - fridges_WD = fridges_WD, freezers_WD = freezers_WD, large_WD = large_electrical_WD, IT_WD = IT_WD, - small_WD = small_electrical_WD, alkaline_batteries_WD = alkaline_batteries_WD, LiIon_batteries_WD = LiIon_batteries_WD, - NiMh_batteries_WD = NiMh_batteries_WD, waste_disposal = electric_waste_disposal, units = units) + fridges_WD = fridges_WD, freezers_WD = freezers_WD, large_electrical_WD = large_electrical_WD, IT_WD = IT_WD, + small_electrical_WD = small_electrical_WD, alkaline_batteries_WD = alkaline_batteries_WD, LiIon_batteries_WD = LiIon_batteries_WD, + NiMh_batteries_WD = NiMh_batteries_WD, electric_waste_disposal = electric_waste_disposal, units = units) emission_values <- uk_gov_data %>% dplyr::filter(`Level 2` %in% c("Organic", "Other")) %>% dplyr::filter(`Column Text` == "Primary material production") %>% diff --git a/R/metal_emissions.R b/R/metal_emissions.R index 61512d5..eb4f380 100644 --- a/R/metal_emissions.R +++ b/R/metal_emissions.R @@ -2,23 +2,35 @@ #' #' @description This function calculates the emissions produced from different metal sources based on the specified inputs. It considers emissions from primary material production and waste disposal of various metal types. #' -#' @param aluminuim_cans Numeric value indicating the weight of aluminum cans. Default is `0`. -#' @param aluminuim_foil Numeric value indicating the weight of aluminum foil. Default is `0`. -#' @param mixed_cans Numeric value indicating the weight of mixed metal cans. Default is `0`. -#' @param scrap Numeric value indicating the weight of metal scrap. Default is `0`. -#' @param steel_cans Numeric value indicating the weight of steel cans. Default is `0`. -#' @param aluminuim_cans_WD Numeric value indicating the weight of aluminum cans disposed of using waste disposal methods. Default is `0`. -#' @param aluminuim_foil_WD Numeric value indicating the weight of aluminum foil disposed of using waste disposal methods. Default is `0`. -#' @param mixed_cans_WD Numeric value indicating the weight of mixed metal cans disposed of using waste disposal methods. Default is `0`. -#' @param scrap_WD Numeric value indicating the weight of metal scrap disposed of using waste disposal methods. Default is `0`. -#' @param steel_cans_WD Numeric value indicating the weight of steel cans disposed of using waste disposal methods. Default is `0`. -#' @param waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". +#' @param aluminuim_cans Numeric value indicating the weight of aluminum cans purchased. Default is `0`. +#' @param aluminuim_foil Numeric value indicating the weight of aluminum foil purchased. Default is `0`. +#' @param mixed_cans Numeric value indicating the weight of mixed metal cans purchased. Default is `0`. +#' @param scrap Numeric value indicating the weight of metal scrap purchased. Default is `0`. +#' @param steel_cans Numeric value indicating the weight of steel cans purchased. Default is `0`. +#' @param aluminuim_cans_WD Numeric value indicating the weight of aluminum cans disposed of using the waste disposal method in `metal_waste_disposal`. Default is `0`. +#' @param aluminuim_foil_WD Numeric value indicating the weight of aluminum foil disposed of using the waste disposal method in `metal_waste_disposal`. Default is `0`. +#' @param mixed_cans_WD Numeric value indicating the weight of mixed metal cans disposed of using the waste disposal method in `metal_waste_disposal`. Default is `0`. +#' @param scrap_WD Numeric value indicating the weight of metal scrap disposed of using the waste disposal method in `metal_waste_disposal`. Default is `0`. +#' @param steel_cans_WD Numeric value indicating the weight of steel cans disposed of using the waste disposal method in `metal_waste_disposal`. Default is `0`. +#' @param metal_waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". See details for more information on the different methods. #' `"Open-loop"` is the process of recycling material into other products. #' `"Closed-loop"` is the process of recycling material back into the same product. #' `"Combustion"` energy is recovered from the waste through incineration and subsequent generation of electricity. #' `"Landfill"` the product goes to landfill after use. -#' @param units Character vector specifying the units of the emissions output. Possible values: "kg", "tonnes". Default is "kg". +#' @param units Character vector specifying the units of the emissions. Possible values: "kg", "tonnes". Default is "kg". #' +#' @details `metal_waste_disposal` methods: +#' `"Open-loop"` is the process of recycling material into other products. +#' `"Closed-loop"` is the process of recycling material back into the same product (often this value is the same as that of `Open-loop`.) +#' `"Combustion"` energy is recovered from the waste through incineration and subsequent generation of electricity. +#' `"Landfill"` the product goes to landfill after use. +#' +#' Note on the Material Use and Waste Disposal from the Government UK Report 2024: +#' "Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +#' "The conversion factors presented for material consumption cover [...] emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." +#' +#' "Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." +#' #' @return The function returns the calculated CO2-equivalent emissions as a numeric value in tonnes. #' @export #' @@ -27,10 +39,10 @@ metal_emissions <- function(aluminuim_cans = 0, aluminuim_foil = 0, mixed_cans = 0, scrap = 0, steel_cans = 0, aluminuim_cans_WD = 0, aluminuim_foil_WD = 0, mixed_cans_WD = 0, scrap_WD = 0, steel_cans_WD = 0, - waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), units = c("kg", "tonnes")){ - waste_disposal <- match.arg(waste_disposal) + metal_waste_disposal <- match.arg(metal_waste_disposal) units <- match.arg(units) checkmate::assert_numeric(aluminuim_cans, lower = 0) checkmate::assert_numeric(aluminuim_foil, lower = 0) @@ -52,7 +64,7 @@ metal_emissions <- function(aluminuim_cans = 0, aluminuim_foil = 0, mixed_cans = WD <- uk_gov_data %>% dplyr::filter(`Level 1` == "Waste disposal") %>% dplyr::filter(`Level 2` == "Metal") %>% - dplyr::filter(`Column Text` == waste_disposal) %>% + dplyr::filter(`Column Text` == metal_waste_disposal) %>% dplyr::mutate(`Level 3` = ifelse(`Level 2` == "Metal", gsub(".*: ", "", `Level 3`), `Level 3`)) diff --git a/R/paper_emissions.R b/R/paper_emissions.R index cc642e6..c487377 100644 --- a/R/paper_emissions.R +++ b/R/paper_emissions.R @@ -2,13 +2,13 @@ #' #' @description This function calculates the emissions produced from different paper sources based on the specified inputs. It considers emissions from primary material production and waste disposal of paper materials. #' -#' @param board Numeric value indicating the weight of paperboard. Default is `0`. -#' @param mixed Numeric value indicating the weight of mixed paper. Default is `0`. -#' @param paper Numeric value indicating the weight of paper. Default is `0`. -#' @param board_WD Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is `0`. -#' @param mixed_WD Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is `0`. -#' @param paper_WD Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is `0`. -#' @param waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: `"Closed-loop"`, `"Combustion"`, `"Composting"`, `"Landfill"`. Default is `"Closed-loop"`. +#' @param board Numeric value indicating the weight of paperboard purchased. Default is `0`. +#' @param mixed Numeric value indicating the weight of mixed paper purchased. Default is `0`. +#' @param paper Numeric value indicating the weight of paper purchased. Default is `0`. +#' @param board_WD Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in `paper_waste_disposal`. Default is `0`. +#' @param mixed_WD Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in `paper_waste_disposal`. Default is `0`. +#' @param paper_WD Numeric value indicating the weight of paper disposed of using the waste disposal method given in `paper_waste_disposal`. Default is `0`. +#' @param paper_waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: `"Closed-loop"`, `"Combustion"`, `"Composting"`, `"Landfill"`. Default is `"Closed-loop"`. See details for more information on these different options. #' `"Closed-loop"` is the process of recycling material back into the same product. #' `"Combustion"` energy is recovered from the waste through incineration and subsequent generation of electricity. #' `"Compost"` CO2e emitted as a result of composting a waste stream. @@ -17,15 +17,27 @@ #' #' @return The function returns the calculated paper emissions as a numeric value in tonnes. #' @export +#' +#' @details `paper_waste_disposal` methods: +#' `"Closed-loop"` is the process of recycling material back into the same product. +#' `"Combustion"` energy is recovered from the waste through incineration and subsequent generation of electricity. +#' `"Composting"` CO2e emitted as a result of composting a waste stream. +#' `"Landfill"` the product goes to landfill after use. +#' +#' Note on the Material Use and Waste Disposal from the Government UK Report 2024: +#' "Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +#' "The conversion factors presented for material consumption cover [...] emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." +#' +#' "Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." #' #' @examples #' paper_emissions(board = 10, board_WD = 10, paper = 100, paper_WD = 100, units = "kg") paper_emissions <- function(board = 0, mixed = 0, paper = 0, board_WD = 0, mixed_WD = 0, paper_WD = 0, - waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), + paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), units = c("kg", "tonnes")){ - waste_disposal <- match.arg(waste_disposal) + paper_waste_disposal <- match.arg(paper_waste_disposal) units <- match.arg(units) checkmate::assert_numeric(board, lower = 0) checkmate::assert_numeric(mixed, lower = 0) @@ -44,7 +56,7 @@ paper_emissions <- function(board = 0, mixed = 0, paper = 0, WD <- uk_gov_data %>% dplyr::filter(`Level 1` == "Waste disposal") %>% dplyr::filter(`Level 2` == "Paper") %>% - dplyr::filter(`Column Text` == waste_disposal) + dplyr::filter(`Column Text` == paper_waste_disposal) emission_values <- MU$value WD_values <- WD$value diff --git a/R/plastic_emissions.R b/R/plastic_emissions.R index 671e3b2..ac014a9 100644 --- a/R/plastic_emissions.R +++ b/R/plastic_emissions.R @@ -2,31 +2,39 @@ #' #' This function calculates the emissions produced from different plastic sources based on the specified inputs. It considers emissions from primary material production and waste disposal of plastic materials. #' -#' @param average Numeric value indicating the weight of average plastic. Default is `0`. -#' @param average_film Numeric value indicating the weight of average film plastic. Default is `0`. -#' @param average_rigid Numeric value indicating the weight of average rigid plastic. Default is `0`. -#' @param HDPE Numeric value indicating the weight of HDPE plastic. Default is `0`. -#' @param LDPE Numeric value indicating the weight of LDPE plastic. Default is `0`. -#' @param LLDPE Numeric value indicating the weight of LLDPE plastic. Default is `0`. -#' @param PET Numeric value indicating the weight of PET plastic. Default is `0`. -#' @param PP Numeric value indicating the weight of PP plastic. Default is `0`. -#' @param PS Numeric value indicating the weight of PS plastic. Default is `0`. -#' @param PVC Numeric value indicating the weight of PVC plastic. Default is `0`. -#' @param average_WD Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is `0`. -#' @param average_film_WD Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is `0`. -#' @param average_rigid_WD Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is `0`. -#' @param HDPE_WD Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is `0`. -#' @param LDPE_WD Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is `0`. -#' @param LLDPE_WD Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is `0`. -#' @param PET_WD Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is `0`. -#' @param PP_WD Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is `0`. -#' @param PS_WD Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is `0`. -#' @param PVC_WD Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is `0`. +#' @param average Numeric value indicating the weight of an overall average plastic purchased. Default is `0`. +#' @param average_film Numeric value indicating the weight of average film plastic purchased. Default is `0`. +#' @param average_rigid Numeric value indicating the weight of average rigid plastic purchased. Default is `0`. +#' @param HDPE Numeric value indicating the weight of HDPE plastic purchased. Default is `0`. +#' @param LDPE Numeric value indicating the weight of LDPE plastic purchased. Default is `0`. +#' @param LLDPE Numeric value indicating the weight of LLDPE plastic purchased. Default is `0`. +#' @param PET Numeric value indicating the weight of PET plastic purchased. Default is `0`. +#' @param PP Numeric value indicating the weight of PP plastic purchased. Default is `0`. +#' @param PS Numeric value indicating the weight of PS plastic purchased. Default is `0`. +#' @param PVC Numeric value indicating the weight of PVC plastic purchased. Default is `0`. +#' @param average_WD Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param average_film_WD Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param average_rigid_WD Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param HDPE_WD Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param LDPE_WD Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param LLDPE_WD Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param PET_WD Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param PP_WD Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param PS_WD Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param PVC_WD Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in `plastic_waste_disposal`. Default is `0`. +#' @param plastic_waste_disposal Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Landfill", "Open-loop", "Closed-loop", "Combustion". Default is "Landfill". More information is given under details. #' @param units Character vector specifying the units of the emissions output. Possible values: `"kg"`, `"tonnes"`. Default is `"kg"`. #' #' @return The calculated plastic emissions as a numeric value in tonnes. #' #' @export +#' +#' @details The different `plastic_waste_disposal` methods are: +#' `"Landfill"` the product goes to landfill after use. +#' `"Open-loop"` is the process of recycling material into other products. +#' `"Closed-loop"` is the process of recycling material back into the same product. +#' `"Combustion"` energy is recovered from the waste through incineration and subsequent generation of electricity. +#' #' #' @examples #' # Calculate plastic emissions using default values @@ -39,8 +47,9 @@ plastic_emissions <- function(average = 0, average_film = 0, average_rigid = 0, LDPE = 0, LLDPE = 0, PET = 0, PP = 0, PS = 0, PVC = 0, average_WD = 0, average_film_WD = 0, average_rigid_WD = 0, HDPE_WD = 0, LDPE_WD = 0, LLDPE_WD = 0, PET_WD = 0, PP_WD = 0, PS_WD = 0, PVC_WD = 0, + plastic_waste_disposal = c("Landfill", "Open-loop", "Closed-loop", "Combustion"), units = c("kg", "tonnes")){ - + plastic_waste_disposal <- match.arg(plastic_waste_disposal) units <- match.arg(units) checkmate::assert_numeric(average, lower = 0) checkmate::assert_numeric(average_film, lower = 0) @@ -78,7 +87,7 @@ plastic_emissions <- function(average = 0, average_film = 0, average_rigid = 0, WD <- uk_gov_data %>% dplyr::filter(`Level 1` == "Waste disposal") %>% dplyr::filter(`Level 2` == "Plastic") %>% - dplyr::filter(`Column Text` == "Closed-loop") + dplyr::filter(`Column Text` == plastic_waste_disposal) emission_values <- MU$value WD_values <- WD$value diff --git a/man/carbonr.Rd b/man/carbonr.Rd index d41d35b..d772e76 100644 --- a/man/carbonr.Rd +++ b/man/carbonr.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/carbonr.R \docType{package} \name{carbonr} -\alias{carbonr} \alias{carbonr-package} +\alias{carbonr} \title{carbonr: Calculate Carbon-Equivalent Emissions} \description{ The \code{carbonr} package provides a flexible tool for calculating carbon-equivalent emissions. diff --git a/man/clinical_theatre_data.Rd b/man/clinical_theatre_data.Rd index b259d06..2f45f4f 100644 --- a/man/clinical_theatre_data.Rd +++ b/man/clinical_theatre_data.Rd @@ -118,67 +118,67 @@ clinical_theatre_data( \item{glass}{Numeric value representing the amount of glass. Default is \code{0}.} -\item{board}{Numeric value indicating the weight of paperboard. Default is \code{0}.} +\item{board}{Numeric value indicating the weight of paperboard purchased. Default is \code{0}.} -\item{mixed}{Numeric value indicating the weight of mixed paper. Default is \code{0}.} +\item{mixed}{Numeric value indicating the weight of mixed paper purchased. Default is \code{0}.} -\item{paper}{Numeric value indicating the weight of paper. Default is \code{0}.} +\item{paper}{Numeric value indicating the weight of paper purchased. Default is \code{0}.} -\item{average}{Numeric value indicating the weight of average plastic. Default is \code{0}.} +\item{average}{Numeric value indicating the weight of an overall average plastic purchased. Default is \code{0}.} -\item{average_film}{Numeric value indicating the weight of average film plastic. Default is \code{0}.} +\item{average_film}{Numeric value indicating the weight of average film plastic purchased. Default is \code{0}.} -\item{average_rigid}{Numeric value indicating the weight of average rigid plastic. Default is \code{0}.} +\item{average_rigid}{Numeric value indicating the weight of average rigid plastic purchased. Default is \code{0}.} -\item{HDPE}{Numeric value indicating the weight of HDPE plastic. Default is \code{0}.} +\item{HDPE}{Numeric value indicating the weight of HDPE plastic purchased. Default is \code{0}.} -\item{LDPE}{Numeric value indicating the weight of LDPE plastic. Default is \code{0}.} +\item{LDPE}{Numeric value indicating the weight of LDPE plastic purchased. Default is \code{0}.} -\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic. Default is \code{0}.} +\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic purchased. Default is \code{0}.} -\item{PET}{Numeric value indicating the weight of PET plastic. Default is \code{0}.} +\item{PET}{Numeric value indicating the weight of PET plastic purchased. Default is \code{0}.} -\item{PP}{Numeric value indicating the weight of PP plastic. Default is \code{0}.} +\item{PP}{Numeric value indicating the weight of PP plastic purchased. Default is \code{0}.} -\item{PS}{Numeric value indicating the weight of PS plastic. Default is \code{0}.} +\item{PS}{Numeric value indicating the weight of PS plastic purchased. Default is \code{0}.} -\item{PVC}{Numeric value indicating the weight of PVC plastic. Default is \code{0}.} +\item{PVC}{Numeric value indicating the weight of PVC plastic purchased. Default is \code{0}.} \item{glass_WD}{Numeric value representing the amount of glass waste with disposal. Default is \code{0}.} \item{glass_waste_disposal}{Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Landfill"}, \code{"Open-loop"}. Default is "Closed-loop". See \code{details} for more information.} -\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is \code{0}.} +\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{paper_WD}{Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is \code{0}.} +\item{paper_WD}{Numeric value indicating the weight of paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} \item{paper_waste_disposal}{Character vector specifying the waste disposal method for paper to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See \code{details} for more information.} -\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{fridges}{Numeric value indicating the weight of fridges. Default is \code{0}.} +\item{fridges}{Numeric value indicating the weight of fridges purchased. Default is \code{0}.} -\item{freezers}{Numeric value indicating the weight of freezers. Default is \code{0}.} +\item{freezers}{Numeric value indicating the weight of freezers purchased. Default is \code{0}.} \item{electric_waste_disposal}{Character vector specifying the waste disposal method for electrical items to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. See \code{details} for more information.} diff --git a/man/clinical_theatre_emissions.Rd b/man/clinical_theatre_emissions.Rd index bc4d703..a94f127 100644 --- a/man/clinical_theatre_emissions.Rd +++ b/man/clinical_theatre_emissions.Rd @@ -98,45 +98,45 @@ clinical_theatre_emissions( \item{glass}{Numeric value representing the amount of glass. Default is \code{0}.} -\item{board}{Numeric value indicating the weight of paperboard. Default is \code{0}.} +\item{board}{Numeric value indicating the weight of paperboard purchased. Default is \code{0}.} -\item{mixed}{Numeric value indicating the weight of mixed paper. Default is \code{0}.} +\item{mixed}{Numeric value indicating the weight of mixed paper purchased. Default is \code{0}.} -\item{paper}{Numeric value indicating the weight of paper. Default is \code{0}.} +\item{paper}{Numeric value indicating the weight of paper purchased. Default is \code{0}.} -\item{average}{Numeric value indicating the weight of average plastic. Default is \code{0}.} +\item{average}{Numeric value indicating the weight of an overall average plastic purchased. Default is \code{0}.} -\item{average_film}{Numeric value indicating the weight of average film plastic. Default is \code{0}.} +\item{average_film}{Numeric value indicating the weight of average film plastic purchased. Default is \code{0}.} -\item{average_rigid}{Numeric value indicating the weight of average rigid plastic. Default is \code{0}.} +\item{average_rigid}{Numeric value indicating the weight of average rigid plastic purchased. Default is \code{0}.} -\item{HDPE}{Numeric value indicating the weight of HDPE plastic. Default is \code{0}.} +\item{HDPE}{Numeric value indicating the weight of HDPE plastic purchased. Default is \code{0}.} -\item{LDPE}{Numeric value indicating the weight of LDPE plastic. Default is \code{0}.} +\item{LDPE}{Numeric value indicating the weight of LDPE plastic purchased. Default is \code{0}.} -\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic. Default is \code{0}.} +\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic purchased. Default is \code{0}.} -\item{PET}{Numeric value indicating the weight of PET plastic. Default is \code{0}.} +\item{PET}{Numeric value indicating the weight of PET plastic purchased. Default is \code{0}.} -\item{PP}{Numeric value indicating the weight of PP plastic. Default is \code{0}.} +\item{PP}{Numeric value indicating the weight of PP plastic purchased. Default is \code{0}.} -\item{PS}{Numeric value indicating the weight of PS plastic. Default is \code{0}.} +\item{PS}{Numeric value indicating the weight of PS plastic purchased. Default is \code{0}.} -\item{PVC}{Numeric value indicating the weight of PVC plastic. Default is \code{0}.} +\item{PVC}{Numeric value indicating the weight of PVC plastic purchased. Default is \code{0}.} \item{glass_WD}{Numeric value representing the amount of glass waste with disposal. Default is \code{0}.} \item{glass_waste_disposal}{Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Landfill"}, \code{"Open-loop"}. Default is "Closed-loop". See \code{details} for more information.} -\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is \code{0}.} +\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{paper_WD}{Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is \code{0}.} +\item{paper_WD}{Numeric value indicating the weight of paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{fridges}{Numeric value indicating the weight of fridges. Default is \code{0}.} +\item{fridges}{Numeric value indicating the weight of fridges purchased. Default is \code{0}.} -\item{freezers}{Numeric value indicating the weight of freezers. Default is \code{0}.} +\item{freezers}{Numeric value indicating the weight of freezers purchased. Default is \code{0}.} \item{electric_waste_disposal}{Character vector specifying the waste disposal method for electrical items to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. See \code{details} for more information.} @@ -144,25 +144,25 @@ clinical_theatre_emissions( \item{paper_waste_disposal}{Character vector specifying the waste disposal method for paper to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See \code{details} for more information.} -\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} \item{glass_units}{Character vector specifying the units of the emissions related to glass. Possible values: \code{"kg"}, \code{"tonnes"}. Default is \code{"kg"}.} diff --git a/man/electrical_emissions.Rd b/man/electrical_emissions.Rd index 6102b27..5022763 100644 --- a/man/electrical_emissions.Rd +++ b/man/electrical_emissions.Rd @@ -7,58 +7,81 @@ electrical_emissions( fridges = 0, freezers = 0, - large = 0, + large_electrical = 0, IT = 0, - small = 0, + small_electrical = 0, alkaline_batteries = 0, LiIon_batteries = 0, NiMh_batteries = 0, fridges_WD = 0, freezers_WD = 0, - large_WD = 0, + large_electrical_WD = 0, IT_WD = 0, - small_WD = 0, + small_electrical_WD = 0, alkaline_batteries_WD = 0, LiIon_batteries_WD = 0, NiMh_batteries_WD = 0, - waste_disposal = c("Landfill", "Open-loop"), + electric_waste_disposal = c("Landfill", "Open-loop"), units = c("kg", "tonnes") ) } \arguments{ -\item{fridges}{Numeric value indicating the weight of fridges. Default is \code{0}.} +\item{fridges}{Numeric value indicating the weight of fridges purchased. Default is \code{0}.} -\item{freezers}{Numeric value indicating the weight of freezers. Default is \code{0}.} +\item{freezers}{Numeric value indicating the weight of freezers purchased. Default is \code{0}.} -\item{large}{Numeric value indicating the weight of large electrical items. Default is \code{0}.} +\item{large_electrical}{Numeric value indicating the weight of large electrical items purchased. Default is \code{0}.} -\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment. Default is \code{0}.} +\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment purchased. Default is \code{0}.} -\item{small}{Numeric value indicating the weight of small electrical items. Default is \code{0}.} +\item{small_electrical}{Numeric value indicating the weight of small electrical items purchased. Default is \code{0}.} -\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries. Default is \code{0}.} +\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries purchased. Default is \code{0}. An alkaline AA battery typically weighs around 23 grams (0.023kg). +These are non-rechargeable batteries, used in: +\itemize{ +\item Day-to-day gadgets: Such as alarm clocks, electric shavers, remote controls, and radios +\item Low-drain applications: Such as flashlights, portable radios, alarm clocks, remote controls, and toys +\item Audiovisual equipment: Such as still digital cameras, strobe cameras, and portable liquid crystal TVs +\item Game equipment: Such as game controllers and walkie talkies +\item Other: Such as hearing aids and mosquito repellant devices +}} -\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries. Default is \code{0}.} +\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries purchased. Default is \code{0}. +Lithium-Ion batteries are often rechargeable and found in: +\itemize{ +\item Electronics: Cell phones, tablets, laptops, digital cameras, watches, and personal digital assistants +\item Vehicles: Electric vehicles, E-bikes, hoverboards, and scooters +\item Tools: Electric toothbrushes and other tools +\item Power backup: Solar power backup storage, uninterrupted power supply (UPS), and emergency power backup +\item Other: Pacemakers, toys, and clocks +}} -\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries. Default is \code{0}.} +\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries purchased. Default is \code{0}. A Nickel Metal Hydride AA battery typically weighs around 31 grams (0.031kg). +These tend to be rechargeable and found in: +\itemize{ +\item Portable devices: digital cameras, MP3 players, and GPS units. +\item Vehicles: Hybrid and electric vehicles +\item Power tools +\item Other: medical instruments, toothbrushes, electric razors, and mobile phones. +}} -\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using waste disposal methods. Default is \code{0}.} +\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using waste disposal methods. Default is \code{0}.} +\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{large_WD}{Numeric value indicating the weight of large electrical items disposed of using waste disposal methods. Default is \code{0}.} +\item{large_electrical_WD}{Numeric value indicating the weight of large electrical items disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using waste disposal methods. Default is \code{0}.} +\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{small_WD}{Numeric value indicating the weight of small electrical items disposed of using waste disposal methods. Default is \code{0}.} +\item{small_electrical_WD}{Numeric value indicating the weight of small electrical items disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. +\item{electric_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. \code{"Open-loop"} is the process of recycling material into other products. \code{"Landfill"} the product goes to landfill after use.} @@ -70,6 +93,13 @@ The calculated electrical emissions as a numeric value in tonnes. \description{ This function calculates the emissions produced from different electrical items and their waste disposal based on the specified inputs. It considers emissions from primary material production and waste disposal of electrical items. } +\details{ +Note on the Material Use and Waste Disposal from the Government UK Report 2024: +"Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +"The conversion factors presented for material consumption cover \link{...} emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." + +"Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." +} \examples{ # Calculate electrical emissions using default values electrical_emissions() @@ -77,5 +107,5 @@ electrical_emissions() # Calculate electrical emissions with specific quantities and waste disposal # method electrical_emissions(fridges = 10, IT = 5, alkaline_batteries = 100, - waste_disposal = "Open-loop", units = "tonnes") + electric_waste_disposal = "Open-loop", units = "tonnes") } diff --git a/man/household_emissions.Rd b/man/household_emissions.Rd index aabf99a..e1c65ff 100644 --- a/man/household_emissions.Rd +++ b/man/household_emissions.Rd @@ -5,15 +5,31 @@ \title{Calculate household material emissions} \usage{ household_emissions( + household_residual_waste = 0, + hh_waste_disposal = c("Combustion", "Landfill"), glass = 0, clothing = 0, + glass_WD = 0, + clothing_WD = 0, + books_WD = 0, + gcb_waste_disposal = c("Closed-loop", "Combustion", "Landfill"), food = 0, drink = 0, compost_from_garden = 0, compost_from_food_and_garden = 0, + food_WD = 0, + drink_WD = 0, + compost_from_garden_WD = 0, + compost_from_food_and_garden_WD = 0, + compost_waste_disposal = c("Anaerobic digestion", "Combustion", "Composting", + "Landfill"), board = 0, mixed = 0, paper = 0, + board_WD = 0, + mixed_WD = 0, + paper_WD = 0, + paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), fridges = 0, freezers = 0, large_electrical = 0, @@ -22,11 +38,26 @@ household_emissions( alkaline_batteries = 0, LiIon_batteries = 0, NiMh_batteries = 0, + fridges_WD = 0, + freezers_WD = 0, + large_electrical_WD = 0, + IT_WD = 0, + small_electrical_WD = 0, + alkaline_batteries_WD = 0, + LiIon_batteries_WD = 0, + NiMh_batteries_WD = 0, + electric_waste_disposal = c("Landfill", "Open-loop"), aluminuim_cans = 0, aluminuim_foil = 0, mixed_cans = 0, scrap = 0, steel_cans = 0, + aluminuim_cans_WD = 0, + aluminuim_foil_WD = 0, + mixed_cans_WD = 0, + scrap_WD = 0, + steel_cans_WD = 0, + metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), average = 0, average_film = 0, average_rigid = 0, @@ -37,28 +68,6 @@ household_emissions( PP = 0, PS = 0, PVC = 0, - glass_WD = 0, - books_WD = 0, - clothing_WD = 0, - gcb_waste_disposal = c("Closed-loop", "Combustion", "Landfill"), - household_residual_waste = 0, - hh_waste_disposal = c("Combustion", "Landfill"), - food_WD = 0, - drink_WD = 0, - compost_from_garden_WD = 0, - compost_from_food_and_garden_WD = 0, - compost_waste_disposal = c("Anaerobic digestion", "Combustion", "Composting", - "Landfill"), - aluminuim_cans_WD = 0, - aluminuim_foil_WD = 0, - mixed_cans_WD = 0, - scrap_WD = 0, - steel_cans_WD = 0, - metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), - board_WD = 0, - mixed_WD = 0, - paper_WD = 0, - paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), average_WD = 0, average_film_WD = 0, average_rigid_WD = 0, @@ -69,164 +78,191 @@ household_emissions( PP_WD = 0, PS_WD = 0, PVC_WD = 0, - fridges_WD = 0, - freezers_WD = 0, - large_electrical_WD = 0, - IT_WD = 0, - small_electrical_WD = 0, - alkaline_batteries_WD = 0, - LiIon_batteries_WD = 0, - NiMh_batteries_WD = 0, - electric_waste_disposal = c("Landfill", "Open-loop"), + plastic_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), units = c("kg", "tonnes") ) } \arguments{ -\item{glass}{Numeric value representing the amount of glass. Default is \code{0}.} +\item{household_residual_waste}{Numeric value representing the amount of household residual waste. Household Residual Waste refers to waste that remains after all recyclable, compostable, and reusable materials have been removed through household recycling, composting, or other waste management activities. This type of waste is typically disposed of through methods such as landfill or incineration and often includes non-recyclable items. Default is \code{0}.} -\item{clothing}{Numeric value representing the amount of clothing. Default is \code{0}.} +\item{hh_waste_disposal}{Character value specifying the waste disposal method for waste (options: \code{"Combustion"}, \code{"Landfill"}). Default is \code{"Combustion"}. See \code{details} for more information.} -\item{food}{Numeric value representing the amount of food. Default is \code{0}.} +\item{glass}{Numeric value representing the amount of glass material purchased. Default is \code{0}.} -\item{drink}{Numeric value representing the amount of drink. Default is \code{0}.} +\item{clothing}{Numeric value representing the amount of clothing material purchased. Default is \code{0}.} -\item{compost_from_garden}{Numeric value representing the amount of compost from garden waste. Default is \code{0}.} +\item{glass_WD}{Numeric value representing the amount of glass waste disposed. Default is \code{0}.} -\item{compost_from_food_and_garden}{Numeric value representing the amount of compost from food and garden waste. Default is \code{0}.} +\item{clothing_WD}{Numeric value representing the amount of clothing waste disposed. Default is \code{0}.} -\item{board}{Numeric value indicating the weight of paperboard. Default is \code{0}.} +\item{books_WD}{Numeric value representing the amount of books waste disposed. Default is \code{0}.} -\item{mixed}{Numeric value indicating the weight of mixed paper. Default is \code{0}.} +\item{gcb_waste_disposal}{Character value specifying the waste disposal method for glass, clothing, and books waste (options: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Landfill"}). Default is \code{"Closed-loop"}. See \code{details} for more information.} -\item{paper}{Numeric value indicating the weight of paper. Default is \code{0}.} +\item{food}{Numeric value representing the amount of food purchased. Default is \code{0}.} -\item{fridges}{Numeric value indicating the weight of fridges. Default is \code{0}.} +\item{drink}{Numeric value representing the amount of drink purchased. Default is \code{0}.} -\item{freezers}{Numeric value indicating the weight of freezers. Default is \code{0}.} +\item{compost_from_garden}{Numeric value representing the amount of compost from garden waste purchased. Default is \code{0}.} -\item{large_electrical}{Numeric value indicating the weight of large electrical items. Default is \code{0}.} +\item{compost_from_food_and_garden}{Numeric value representing the amount of compost from food and garden waste purchased. Default is \code{0}.} -\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment. Default is \code{0}.} +\item{food_WD}{Numeric value indicating the weight of organic food disposed of using waste disposal methods given in \code{compost_waste_disposal}. Default is \code{0}.} -\item{small_electrical}{Numeric value indicating the weight of small electrical items. Default is \code{0}.} +\item{drink_WD}{Numeric value indicating the weight of organic drink disposed of using the waste disposal method given in \code{compost_waste_disposal}. Default is \code{0}.} -\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries. Default is \code{0}.} +\item{compost_from_garden_WD}{Numeric value indicating the weight of compost from garden waste disposed of using waste disposal methods. Default is \code{0}.} -\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries. Default is \code{0}.} +\item{compost_from_food_and_garden_WD}{Numeric value indicating the weight of compost from garden and food waste disposed of using waste disposal methods. Default is \code{0}.} -\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries. Default is \code{0}.} +\item{compost_waste_disposal}{Character value specifying the waste disposal method for compost waste (options: \code{"Anaerobic digestion"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}). Default is \code{"Anaerobic digestion"}. See \code{details} for more information.} -\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans. Default is \code{0}.} +\item{board}{Numeric value indicating the weight of paperboard purchased. Default is \code{0}.} -\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil. Default is \code{0}.} +\item{mixed}{Numeric value indicating the weight of mixed paper purchased. Default is \code{0}.} -\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans. Default is \code{0}.} +\item{paper}{Numeric value indicating the weight of paper purchased. Default is \code{0}.} -\item{scrap}{Numeric value indicating the weight of metal scrap. Default is \code{0}.} +\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{steel_cans}{Numeric value indicating the weight of steel cans. Default is \code{0}.} +\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{average}{Numeric value indicating the weight of average plastic. Default is \code{0}.} +\item{paper_WD}{Numeric value indicating the weight of paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{average_film}{Numeric value indicating the weight of average film plastic. Default is \code{0}.} +\item{paper_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See details for more information on these different options. +\code{"Closed-loop"} is the process of recycling material back into the same product. +\code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. +\code{"Compost"} CO2e emitted as a result of composting a waste stream. +\code{"Landfill"} the product goes to landfill after use.} -\item{average_rigid}{Numeric value indicating the weight of average rigid plastic. Default is \code{0}.} +\item{fridges}{Numeric value indicating the weight of fridges purchased. Default is \code{0}.} -\item{HDPE}{Numeric value indicating the weight of HDPE plastic. Default is \code{0}.} +\item{freezers}{Numeric value indicating the weight of freezers purchased. Default is \code{0}.} -\item{LDPE}{Numeric value indicating the weight of LDPE plastic. Default is \code{0}.} +\item{large_electrical}{Numeric value indicating the weight of large electrical items purchased. Default is \code{0}.} -\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic. Default is \code{0}.} +\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment purchased. Default is \code{0}.} -\item{PET}{Numeric value indicating the weight of PET plastic. Default is \code{0}.} +\item{small_electrical}{Numeric value indicating the weight of small electrical items purchased. Default is \code{0}.} -\item{PP}{Numeric value indicating the weight of PP plastic. Default is \code{0}.} +\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries purchased. Default is \code{0}. An alkaline AA battery typically weighs around 23 grams (0.023kg). +These are non-rechargeable batteries, used in: +\itemize{ +\item Day-to-day gadgets: Such as alarm clocks, electric shavers, remote controls, and radios +\item Low-drain applications: Such as flashlights, portable radios, alarm clocks, remote controls, and toys +\item Audiovisual equipment: Such as still digital cameras, strobe cameras, and portable liquid crystal TVs +\item Game equipment: Such as game controllers and walkie talkies +\item Other: Such as hearing aids and mosquito repellant devices +}} -\item{PS}{Numeric value indicating the weight of PS plastic. Default is \code{0}.} +\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries purchased. Default is \code{0}. +Lithium-Ion batteries are often rechargeable and found in: +\itemize{ +\item Electronics: Cell phones, tablets, laptops, digital cameras, watches, and personal digital assistants +\item Vehicles: Electric vehicles, E-bikes, hoverboards, and scooters +\item Tools: Electric toothbrushes and other tools +\item Power backup: Solar power backup storage, uninterrupted power supply (UPS), and emergency power backup +\item Other: Pacemakers, toys, and clocks +}} -\item{PVC}{Numeric value indicating the weight of PVC plastic. Default is \code{0}.} +\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries purchased. Default is \code{0}. A Nickel Metal Hydride AA battery typically weighs around 31 grams (0.031kg). +These tend to be rechargeable and found in: +\itemize{ +\item Portable devices: digital cameras, MP3 players, and GPS units. +\item Vehicles: Hybrid and electric vehicles +\item Power tools +\item Other: medical instruments, toothbrushes, electric razors, and mobile phones. +}} -\item{glass_WD}{Numeric value representing the amount of glass waste with disposal. Default is \code{0}.} +\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{books_WD}{Numeric value representing the amount of books waste with disposal. Default is \code{0}.} +\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{clothing_WD}{Numeric value representing the amount of clothing waste with disposal. Default is \code{0}.} +\item{large_electrical_WD}{Numeric value indicating the weight of large electrical items disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{gcb_waste_disposal}{Character value specifying the waste disposal method for glass, clothing, and books waste (options: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Landfill"}). Default is \code{"Closed-loop"}. See \code{details} for more information.} +\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{household_residual_waste}{Numeric value representing the amount of household residual waste. Default is \code{0}.} +\item{small_electrical_WD}{Numeric value indicating the weight of small electrical items disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{hh_waste_disposal}{Character value specifying the waste disposal method for waste (options: \code{"Combustion"}, \code{"Landfill"}). Default is \code{"Combustion"}. See \code{details} for more information.} +\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{food_WD}{Numeric value indicating the weight of food disposed of using waste disposal methods. Default is \code{0}.} +\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{drink_WD}{Numeric value indicating the weight of drink disposed of using waste disposal methods. Default is \code{0}.} +\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{compost_from_garden_WD}{Numeric value indicating the weight of compost from garden waste disposed of using waste disposal methods. Default is \code{0}.} +\item{electric_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. +\code{"Open-loop"} is the process of recycling material into other products. +\code{"Landfill"} the product goes to landfill after use.} -\item{compost_from_food_and_garden_WD}{Numeric value indicating the weight of compost from garden and food waste disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans purchased. Default is \code{0}.} -\item{compost_waste_disposal}{Character value specifying the waste disposal method for compost waste (options: \code{"Anaerobic digestion"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}). Default is \code{"Anaerobic digestion"}. See \code{details} for more information.} +\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil purchased. Default is \code{0}.} + +\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans purchased. Default is \code{0}.} -\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using waste disposal methods. Default is \code{0}.} +\item{scrap}{Numeric value indicating the weight of metal scrap purchased. Default is \code{0}.} -\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using waste disposal methods. Default is \code{0}.} +\item{steel_cans}{Numeric value indicating the weight of steel cans purchased. Default is \code{0}.} -\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{metal_waste_disposal}{Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". See \code{details} for more information.} +\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is \code{0}.} +\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is \code{0}.} +\item{metal_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". See details for more information on the different methods. +\code{"Open-loop"} is the process of recycling material into other products. +\code{"Closed-loop"} is the process of recycling material back into the same product. +\code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. +\code{"Landfill"} the product goes to landfill after use.} -\item{paper_WD}{Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is \code{0}.} +\item{average}{Numeric value indicating the weight of an overall average plastic purchased. Default is \code{0}.} -\item{paper_waste_disposal}{Character vector specifying the waste disposal method for paper to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See \code{details} for more information.} +\item{average_film}{Numeric value indicating the weight of average film plastic purchased. Default is \code{0}.} -\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid}{Numeric value indicating the weight of average rigid plastic purchased. Default is \code{0}.} -\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE}{Numeric value indicating the weight of HDPE plastic purchased. Default is \code{0}.} -\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE}{Numeric value indicating the weight of LDPE plastic purchased. Default is \code{0}.} -\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic purchased. Default is \code{0}.} -\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PET}{Numeric value indicating the weight of PET plastic purchased. Default is \code{0}.} -\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PP}{Numeric value indicating the weight of PP plastic purchased. Default is \code{0}.} -\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PS}{Numeric value indicating the weight of PS plastic purchased. Default is \code{0}.} -\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC}{Numeric value indicating the weight of PVC plastic purchased. Default is \code{0}.} -\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{large_electrical_WD}{Numeric value indicating the weight of large electrical items disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{small_electrical_WD}{Numeric value indicating the weight of small electrical items disposed of using waste disposal methods. Default is \code{0}.} +\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{electric_waste_disposal}{Character vector specifying the waste disposal method for electrical items to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. See \code{details} for more information.} +\item{plastic_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Landfill", "Open-loop", "Closed-loop", "Combustion". Default is "Landfill". More information is given under details.} -\item{units}{Character vector specifying the units of the emissions output. Possible values: \code{"kg"}, \code{"tonnes"}. Default is \code{"kg"}.} +\item{units}{Character vector specifying the units of the emissions. Possible values: \code{"kg"}, \code{"tonnes"}. Default is \code{"kg"}.} } \value{ The calculated household emissions as a numeric value in tonnes. @@ -242,6 +278,12 @@ Calculate household material emissions \code{"Compost"} CO2e emitted as a result of composting a waste stream. \code{"Landfill"} the product goes to landfill after use. \code{"Anaerobic digestion"} energy is recovered from the waste through anaerobic digestion. + +Note on the Material Use and Waste Disposal from the Government UK Report 2024: +"Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +"The conversion factors presented for material consumption cover \link{...} emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." + +"Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." } \examples{ household_emissions(glass = 100, clothing = 10, glass_WD = 10, units = "kg") diff --git a/man/material_emissions.Rd b/man/material_emissions.Rd index 619255d..93d8534 100644 --- a/man/material_emissions.Rd +++ b/man/material_emissions.Rd @@ -104,57 +104,80 @@ material_emissions( \arguments{ \item{glass}{Numeric value representing the amount of glass. Default is \code{0}.} -\item{board}{Numeric value indicating the weight of paperboard. Default is \code{0}.} +\item{board}{Numeric value indicating the weight of paperboard purchased. Default is \code{0}.} -\item{mixed}{Numeric value indicating the weight of mixed paper. Default is \code{0}.} +\item{mixed}{Numeric value indicating the weight of mixed paper purchased. Default is \code{0}.} -\item{paper}{Numeric value indicating the weight of paper. Default is \code{0}.} +\item{paper}{Numeric value indicating the weight of paper purchased. Default is \code{0}.} -\item{fridges}{Numeric value indicating the weight of fridges. Default is \code{0}.} +\item{fridges}{Numeric value indicating the weight of fridges purchased. Default is \code{0}.} -\item{freezers}{Numeric value indicating the weight of freezers. Default is \code{0}.} +\item{freezers}{Numeric value indicating the weight of freezers purchased. Default is \code{0}.} \item{large_electrical}{Numeric value indicating the weight of large electrical items. Default is \code{0}.} -\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment. Default is \code{0}.} +\item{IT}{Numeric value indicating the weight of IT (Information Technology) equipment purchased. Default is \code{0}.} \item{small_electrical}{Numeric value indicating the weight of small electrical items. Default is \code{0}.} -\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries. Default is \code{0}.} +\item{alkaline_batteries}{Numeric value indicating the weight of alkaline batteries purchased. Default is \code{0}. An alkaline AA battery typically weighs around 23 grams (0.023kg). +These are non-rechargeable batteries, used in: +\itemize{ +\item Day-to-day gadgets: Such as alarm clocks, electric shavers, remote controls, and radios +\item Low-drain applications: Such as flashlights, portable radios, alarm clocks, remote controls, and toys +\item Audiovisual equipment: Such as still digital cameras, strobe cameras, and portable liquid crystal TVs +\item Game equipment: Such as game controllers and walkie talkies +\item Other: Such as hearing aids and mosquito repellant devices +}} -\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries. Default is \code{0}.} +\item{LiIon_batteries}{Numeric value indicating the weight of Lithium-ion batteries purchased. Default is \code{0}. +Lithium-Ion batteries are often rechargeable and found in: +\itemize{ +\item Electronics: Cell phones, tablets, laptops, digital cameras, watches, and personal digital assistants +\item Vehicles: Electric vehicles, E-bikes, hoverboards, and scooters +\item Tools: Electric toothbrushes and other tools +\item Power backup: Solar power backup storage, uninterrupted power supply (UPS), and emergency power backup +\item Other: Pacemakers, toys, and clocks +}} -\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries. Default is \code{0}.} +\item{NiMh_batteries}{Numeric value indicating the weight of Nickel Metal Hydride batteries purchased. Default is \code{0}. A Nickel Metal Hydride AA battery typically weighs around 31 grams (0.031kg). +These tend to be rechargeable and found in: +\itemize{ +\item Portable devices: digital cameras, MP3 players, and GPS units. +\item Vehicles: Hybrid and electric vehicles +\item Power tools +\item Other: medical instruments, toothbrushes, electric razors, and mobile phones. +}} -\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans. Default is \code{0}.} +\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans purchased. Default is \code{0}.} -\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil. Default is \code{0}.} +\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil purchased. Default is \code{0}.} -\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans. Default is \code{0}.} +\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans purchased. Default is \code{0}.} -\item{scrap}{Numeric value indicating the weight of metal scrap. Default is \code{0}.} +\item{scrap}{Numeric value indicating the weight of metal scrap purchased. Default is \code{0}.} -\item{steel_cans}{Numeric value indicating the weight of steel cans. Default is \code{0}.} +\item{steel_cans}{Numeric value indicating the weight of steel cans purchased. Default is \code{0}.} -\item{average}{Numeric value indicating the weight of average plastic. Default is \code{0}.} +\item{average}{Numeric value indicating the weight of an overall average plastic purchased. Default is \code{0}.} -\item{average_film}{Numeric value indicating the weight of average film plastic. Default is \code{0}.} +\item{average_film}{Numeric value indicating the weight of average film plastic purchased. Default is \code{0}.} -\item{average_rigid}{Numeric value indicating the weight of average rigid plastic. Default is \code{0}.} +\item{average_rigid}{Numeric value indicating the weight of average rigid plastic purchased. Default is \code{0}.} -\item{HDPE}{Numeric value indicating the weight of HDPE plastic. Default is \code{0}.} +\item{HDPE}{Numeric value indicating the weight of HDPE plastic purchased. Default is \code{0}.} -\item{LDPE}{Numeric value indicating the weight of LDPE plastic. Default is \code{0}.} +\item{LDPE}{Numeric value indicating the weight of LDPE plastic purchased. Default is \code{0}.} -\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic. Default is \code{0}.} +\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic purchased. Default is \code{0}.} -\item{PET}{Numeric value indicating the weight of PET plastic. Default is \code{0}.} +\item{PET}{Numeric value indicating the weight of PET plastic purchased. Default is \code{0}.} -\item{PP}{Numeric value indicating the weight of PP plastic. Default is \code{0}.} +\item{PP}{Numeric value indicating the weight of PP plastic purchased. Default is \code{0}.} -\item{PS}{Numeric value indicating the weight of PS plastic. Default is \code{0}.} +\item{PS}{Numeric value indicating the weight of PS plastic purchased. Default is \code{0}.} -\item{PVC}{Numeric value indicating the weight of PVC plastic. Default is \code{0}.} +\item{PVC}{Numeric value indicating the weight of PVC plastic purchased. Default is \code{0}.} \item{glass_WD}{Numeric value representing the amount of glass waste with disposal. Default is \code{0}.} @@ -164,61 +187,61 @@ material_emissions( \item{industrial_waste_disposal}{Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: \code{"Combustion"}, \code{"Landfill"}. Default is \code{"Combustion"}. See \code{details} for more information.} -\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using waste disposal methods. Default is \code{0}.} +\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using waste disposal methods. Default is \code{0}.} +\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} \item{metal_waste_disposal}{Character vector specifying the waste disposal method to use for metal for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Landfill"}, \code{"Open-loop"}. Default is "Closed-loop". See \code{details} for more information.} -\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is \code{0}.} +\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{paper_WD}{Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is \code{0}.} +\item{paper_WD}{Numeric value indicating the weight of paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} \item{paper_waste_disposal}{Character vector specifying the waste disposal method for paper to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See \code{details} for more information.} -\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using waste disposal methods. Default is \code{0}.} +\item{fridges_WD}{Numeric value indicating the weight of fridges disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using waste disposal methods. Default is \code{0}.} +\item{freezers_WD}{Numeric value indicating the weight of freezers disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} \item{large_electrical_WD}{Numeric value indicating the weight of large electrical items disposed of using waste disposal methods. Default is \code{0}.} -\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using waste disposal methods. Default is \code{0}.} +\item{IT_WD}{Numeric value indicating the weight of IT equipment disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} \item{small_electrical_WD}{Numeric value indicating the weight of small electrical items disposed of using waste disposal methods. Default is \code{0}.} -\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{alkaline_batteries_WD}{Numeric value indicating the weight of alkaline batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{LiIon_batteries_WD}{Numeric value indicating the weight of Lithium-ion batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} -\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using waste disposal methods. Default is \code{0}.} +\item{NiMh_batteries_WD}{Numeric value indicating the weight of Nickel Metal Hydride batteries disposed of using the waste disposal method given in \code{electric_waste_disposal}. Default is \code{0}.} \item{electric_waste_disposal}{Character vector specifying the waste disposal method for electrical items to use for calculating emissions. Possible values: \code{"Landfill"}, \code{"Open-loop"}. Default is \code{"Landfill"}. See \code{details} for more information.} diff --git a/man/metal_emissions.Rd b/man/metal_emissions.Rd index a4fbd50..a2d4da1 100644 --- a/man/metal_emissions.Rd +++ b/man/metal_emissions.Rd @@ -15,38 +15,38 @@ metal_emissions( mixed_cans_WD = 0, scrap_WD = 0, steel_cans_WD = 0, - waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), units = c("kg", "tonnes") ) } \arguments{ -\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans. Default is \code{0}.} +\item{aluminuim_cans}{Numeric value indicating the weight of aluminum cans purchased. Default is \code{0}.} -\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil. Default is \code{0}.} +\item{aluminuim_foil}{Numeric value indicating the weight of aluminum foil purchased. Default is \code{0}.} -\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans. Default is \code{0}.} +\item{mixed_cans}{Numeric value indicating the weight of mixed metal cans purchased. Default is \code{0}.} -\item{scrap}{Numeric value indicating the weight of metal scrap. Default is \code{0}.} +\item{scrap}{Numeric value indicating the weight of metal scrap purchased. Default is \code{0}.} -\item{steel_cans}{Numeric value indicating the weight of steel cans. Default is \code{0}.} +\item{steel_cans}{Numeric value indicating the weight of steel cans purchased. Default is \code{0}.} -\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_cans_WD}{Numeric value indicating the weight of aluminum cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using waste disposal methods. Default is \code{0}.} +\item{aluminuim_foil_WD}{Numeric value indicating the weight of aluminum foil disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_cans_WD}{Numeric value indicating the weight of mixed metal cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using waste disposal methods. Default is \code{0}.} +\item{scrap_WD}{Numeric value indicating the weight of metal scrap disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using waste disposal methods. Default is \code{0}.} +\item{steel_cans_WD}{Numeric value indicating the weight of steel cans disposed of using the waste disposal method in \code{metal_waste_disposal}. Default is \code{0}.} -\item{waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". +\item{metal_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Closed-loop", "Combustion", "Landfill", "Open-loop". Default is "Closed-loop". See details for more information on the different methods. \code{"Open-loop"} is the process of recycling material into other products. \code{"Closed-loop"} is the process of recycling material back into the same product. \code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. \code{"Landfill"} the product goes to landfill after use.} -\item{units}{Character vector specifying the units of the emissions output. Possible values: "kg", "tonnes". Default is "kg".} +\item{units}{Character vector specifying the units of the emissions. Possible values: "kg", "tonnes". Default is "kg".} } \value{ The function returns the calculated CO2-equivalent emissions as a numeric value in tonnes. @@ -54,6 +54,19 @@ The function returns the calculated CO2-equivalent emissions as a numeric value \description{ This function calculates the emissions produced from different metal sources based on the specified inputs. It considers emissions from primary material production and waste disposal of various metal types. } +\details{ +\code{metal_waste_disposal} methods: +\code{"Open-loop"} is the process of recycling material into other products. +\code{"Closed-loop"} is the process of recycling material back into the same product (often this value is the same as that of \code{Open-loop}.) +\code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. +\code{"Landfill"} the product goes to landfill after use. + +Note on the Material Use and Waste Disposal from the Government UK Report 2024: +"Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +"The conversion factors presented for material consumption cover \link{...} emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." + +"Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." +} \examples{ metal_emissions(aluminuim_cans = 1.4, units = "tonnes") } diff --git a/man/paper_emissions.Rd b/man/paper_emissions.Rd index 276ee35..277c75e 100644 --- a/man/paper_emissions.Rd +++ b/man/paper_emissions.Rd @@ -11,24 +11,24 @@ paper_emissions( board_WD = 0, mixed_WD = 0, paper_WD = 0, - waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), + paper_waste_disposal = c("Closed-loop", "Combustion", "Composting", "Landfill"), units = c("kg", "tonnes") ) } \arguments{ -\item{board}{Numeric value indicating the weight of paperboard. Default is \code{0}.} +\item{board}{Numeric value indicating the weight of paperboard purchased. Default is \code{0}.} -\item{mixed}{Numeric value indicating the weight of mixed paper. Default is \code{0}.} +\item{mixed}{Numeric value indicating the weight of mixed paper purchased. Default is \code{0}.} -\item{paper}{Numeric value indicating the weight of paper. Default is \code{0}.} +\item{paper}{Numeric value indicating the weight of paper purchased. Default is \code{0}.} -\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using waste disposal methods. Default is \code{0}.} +\item{board_WD}{Numeric value indicating the weight of paperboard disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using waste disposal methods. Default is \code{0}.} +\item{mixed_WD}{Numeric value indicating the weight of mixed paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{paper_WD}{Numeric value indicating the weight of paper disposed of using waste disposal methods. Default is \code{0}.} +\item{paper_WD}{Numeric value indicating the weight of paper disposed of using the waste disposal method given in \code{paper_waste_disposal}. Default is \code{0}.} -\item{waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. +\item{paper_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: \code{"Closed-loop"}, \code{"Combustion"}, \code{"Composting"}, \code{"Landfill"}. Default is \code{"Closed-loop"}. See details for more information on these different options. \code{"Closed-loop"} is the process of recycling material back into the same product. \code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. \code{"Compost"} CO2e emitted as a result of composting a waste stream. @@ -42,6 +42,19 @@ The function returns the calculated paper emissions as a numeric value in tonnes \description{ This function calculates the emissions produced from different paper sources based on the specified inputs. It considers emissions from primary material production and waste disposal of paper materials. } +\details{ +\code{paper_waste_disposal} methods: +\code{"Closed-loop"} is the process of recycling material back into the same product. +\code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. +\code{"Composting"} CO2e emitted as a result of composting a waste stream. +\code{"Landfill"} the product goes to landfill after use. + +Note on the Material Use and Waste Disposal from the Government UK Report 2024: +"Material use conversion factors should be used only to report on procured products and materials based on their origin (that is, comprised of primary material or recycled materials). The factors are not suitable for quantifying the benefits of collecting products or materials for recycling." +"The conversion factors presented for material consumption cover \link{...} emissions from the point of raw material extraction through to the point at which a finished good is manufactured and provided for sale. Therefore, commercial enterprises may use these factors to estimate the impact of goods they procure. Organisations involved in manufacturing goods using these materials should note that if they separately report emissions associated with their energy use in forming products with these materials, there is potential for double counting. As many of the data sources used in preparing the tables are confidential, we cannot publish a more detailed breakdown." + +"Waste-disposal figures should be used for Greenhouse Gas Protocol reporting of Scope 3 emissions associated with end-of-life disposal of different materials. With the exception of landfill, these figures only cover emissions from the collection of materials and delivery to the point of treatment or disposal. They do not cover the environmental impact of different waste management options." +} \examples{ paper_emissions(board = 10, board_WD = 10, paper = 100, paper_WD = 100, units = "kg") } diff --git a/man/plastic_emissions.Rd b/man/plastic_emissions.Rd index c6f131f..0efb309 100644 --- a/man/plastic_emissions.Rd +++ b/man/plastic_emissions.Rd @@ -25,49 +25,52 @@ plastic_emissions( PP_WD = 0, PS_WD = 0, PVC_WD = 0, + plastic_waste_disposal = c("Landfill", "Open-loop", "Closed-loop", "Combustion"), units = c("kg", "tonnes") ) } \arguments{ -\item{average}{Numeric value indicating the weight of average plastic. Default is \code{0}.} +\item{average}{Numeric value indicating the weight of an overall average plastic purchased. Default is \code{0}.} -\item{average_film}{Numeric value indicating the weight of average film plastic. Default is \code{0}.} +\item{average_film}{Numeric value indicating the weight of average film plastic purchased. Default is \code{0}.} -\item{average_rigid}{Numeric value indicating the weight of average rigid plastic. Default is \code{0}.} +\item{average_rigid}{Numeric value indicating the weight of average rigid plastic purchased. Default is \code{0}.} -\item{HDPE}{Numeric value indicating the weight of HDPE plastic. Default is \code{0}.} +\item{HDPE}{Numeric value indicating the weight of HDPE plastic purchased. Default is \code{0}.} -\item{LDPE}{Numeric value indicating the weight of LDPE plastic. Default is \code{0}.} +\item{LDPE}{Numeric value indicating the weight of LDPE plastic purchased. Default is \code{0}.} -\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic. Default is \code{0}.} +\item{LLDPE}{Numeric value indicating the weight of LLDPE plastic purchased. Default is \code{0}.} -\item{PET}{Numeric value indicating the weight of PET plastic. Default is \code{0}.} +\item{PET}{Numeric value indicating the weight of PET plastic purchased. Default is \code{0}.} -\item{PP}{Numeric value indicating the weight of PP plastic. Default is \code{0}.} +\item{PP}{Numeric value indicating the weight of PP plastic purchased. Default is \code{0}.} -\item{PS}{Numeric value indicating the weight of PS plastic. Default is \code{0}.} +\item{PS}{Numeric value indicating the weight of PS plastic purchased. Default is \code{0}.} -\item{PVC}{Numeric value indicating the weight of PVC plastic. Default is \code{0}.} +\item{PVC}{Numeric value indicating the weight of PVC plastic purchased. Default is \code{0}.} -\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_WD}{Numeric value indicating the weight of average plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_film_WD}{Numeric value indicating the weight of average film plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{average_rigid_WD}{Numeric value indicating the weight of average rigid plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{HDPE_WD}{Numeric value indicating the weight of HDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LDPE_WD}{Numeric value indicating the weight of LDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{LLDPE_WD}{Numeric value indicating the weight of LLDPE plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PET_WD}{Numeric value indicating the weight of PET plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PP_WD}{Numeric value indicating the weight of PP plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PS_WD}{Numeric value indicating the weight of PS plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} -\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using waste disposal methods. Default is \code{0}.} +\item{PVC_WD}{Numeric value indicating the weight of PVC plastic disposed of using the waste disposal methods given in \code{plastic_waste_disposal}. Default is \code{0}.} + +\item{plastic_waste_disposal}{Character vector specifying the waste disposal method to use for calculating emissions. Possible values: "Landfill", "Open-loop", "Closed-loop", "Combustion". Default is "Landfill". More information is given under details.} \item{units}{Character vector specifying the units of the emissions output. Possible values: \code{"kg"}, \code{"tonnes"}. Default is \code{"kg"}.} } @@ -77,6 +80,13 @@ The calculated plastic emissions as a numeric value in tonnes. \description{ This function calculates the emissions produced from different plastic sources based on the specified inputs. It considers emissions from primary material production and waste disposal of plastic materials. } +\details{ +The different \code{plastic_waste_disposal} methods are: +\code{"Landfill"} the product goes to landfill after use. +\code{"Open-loop"} is the process of recycling material into other products. +\code{"Closed-loop"} is the process of recycling material back into the same product. +\code{"Combustion"} energy is recovered from the waste through incineration and subsequent generation of electricity. +} \examples{ # Calculate plastic emissions using default values plastic_emissions() From 04d672f704c274365c939981552991c932df457c Mon Sep 17 00:00:00 2001 From: lilyclements Date: Thu, 5 Dec 2024 08:58:02 +0000 Subject: [PATCH 2/3] update in *_waste_disposal parameter names --- R/material_emissions.R | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/R/material_emissions.R b/R/material_emissions.R index 4c72b0c..26a1433 100644 --- a/R/material_emissions.R +++ b/R/material_emissions.R @@ -90,21 +90,21 @@ material_emissions <- function(glass = 0, board = 0, mixed = 0, paper = 0, mixed_cans = mixed_cans, scrap = scrap, steel_cans = steel_cans, aluminuim_cans_WD = aluminuim_cans_WD, aluminuim_foil_WD = aluminuim_foil_WD, mixed_cans_WD = mixed_cans_WD, scrap_WD = scrap_WD, steel_cans_WD = steel_cans_WD, - waste_disposal = metal_waste_disposal, units = metal_units) + metal_waste_disposal = metal_waste_disposal, units = metal_units) paper_emissions <- paper_emissions(board = board, mixed = mixed, paper = paper, board_WD = board_WD, mixed_WD = mixed_WD, paper_WD = paper_WD, - waste_disposal = paper_waste_disposal, units = paper_units) + paper_waste_disposal = paper_waste_disposal, units = paper_units) plastic_emissions <- plastic_emissions(average = average, average_film = average_film, average_rigid = average_rigid, HDPE = HDPE, LDPE = LDPE, LLDPE = LLDPE, PET = PET, PP = PP, PS = PS, PVC = PVC, average_WD = average_WD, average_film_WD = average_film_WD, average_rigid_WD = average_rigid_WD, HDPE_WD = HDPE_WD, LDPE_WD = LDPE_WD, LLDPE_WD = LLDPE_WD, PET_WD = PET_WD, PP_WD = PP_WD, PS_WD = PS_WD, PVC_WD = PVC_WD, units = plastic_units) - electrical_emissions <- electrical_emissions(fridges = fridges, freezers = freezers, large = large_electrical, IT = IT, - small = small_electrical, alkaline_batteries = alkaline_batteries, + electrical_emissions <- electrical_emissions(fridges = fridges, freezers = freezers, large_electrical = large_electrical, IT = IT, + small_electrical = small_electrical, alkaline_batteries = alkaline_batteries, LiIon_batteries = LiIon_batteries, NiMh_batteries = NiMh_batteries, - fridges_WD = fridges_WD, freezers_WD = freezers_WD, large_WD = large_electrical_WD, IT_WD = IT_WD, - small_WD = small_electrical_WD, alkaline_batteries_WD = alkaline_batteries_WD, LiIon_batteries_WD = LiIon_batteries_WD, - NiMh_batteries_WD = NiMh_batteries_WD, waste_disposal = electric_waste_disposal, units = electrical_units) + fridges_WD = fridges_WD, freezers_WD = freezers_WD, large_electrical_WD = large_electrical_WD, IT_WD = IT_WD, + small_electrical_WD = small_electrical_WD, alkaline_batteries_WD = alkaline_batteries_WD, LiIon_batteries_WD = LiIon_batteries_WD, + NiMh_batteries_WD = NiMh_batteries_WD, electric_waste_disposal = electric_waste_disposal, units = electrical_units) construction_emissions <- construction_emissions(aggregates = aggregates, average = construction_average, asbestos = asbestos, asphalt = asphalt, bricks = bricks, concrete = concrete, insulation = insulation, metals = metals, soils = soils, mineral_oil = mineral_oil, plasterboard = plasterboard, tyres = tyres, wood = wood, From aa24430b673155da5c40914af943365225254b8e Mon Sep 17 00:00:00 2001 From: lilyclements Date: Thu, 5 Dec 2024 09:27:17 +0000 Subject: [PATCH 3/3] rearrange defaults --- R/household_emissions.R | 4 ++-- man/household_emissions.Rd | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/R/household_emissions.R b/R/household_emissions.R index 6e085b2..48e8953 100644 --- a/R/household_emissions.R +++ b/R/household_emissions.R @@ -42,7 +42,7 @@ #' #' @examples #' household_emissions(glass = 100, clothing = 10, glass_WD = 10, units = "kg") -household_emissions <- function(household_residual_waste = 0, hh_waste_disposal = c("Combustion", "Landfill"), +household_emissions <- function(household_residual_waste = 0, hh_waste_disposal = c("Landfill", "Combustion"), glass = 0, clothing = 0, glass_WD = 0, clothing_WD = 0,books_WD = 0, gcb_waste_disposal = c("Closed-loop", "Combustion", "Landfill"), food = 0, drink = 0, compost_from_garden = 0, compost_from_food_and_garden = 0, food_WD = 0, drink_WD = 0, compost_from_garden_WD = 0, compost_from_food_and_garden_WD = 0, compost_waste_disposal = c("Anaerobic digestion", "Combustion", "Composting", "Landfill"), @@ -55,7 +55,7 @@ household_emissions <- function(household_residual_waste = 0, hh_waste_disposal metal_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), average = 0, average_film = 0, average_rigid = 0, HDPE = 0, LDPE = 0, LLDPE = 0, PET = 0, PP = 0, PS = 0, PVC = 0, average_WD = 0, average_film_WD = 0, average_rigid_WD = 0, HDPE_WD = 0, LDPE_WD = 0, LLDPE_WD = 0, PET_WD = 0, PP_WD = 0, PS_WD = 0, PVC_WD = 0, - plastic_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + plastic_waste_disposal = c("Landfill", "Open-loop", "Closed-loop", "Combustion"), units = c("kg", "tonnes")){ diff --git a/man/household_emissions.Rd b/man/household_emissions.Rd index e1c65ff..440dd9f 100644 --- a/man/household_emissions.Rd +++ b/man/household_emissions.Rd @@ -6,7 +6,7 @@ \usage{ household_emissions( household_residual_waste = 0, - hh_waste_disposal = c("Combustion", "Landfill"), + hh_waste_disposal = c("Landfill", "Combustion"), glass = 0, clothing = 0, glass_WD = 0, @@ -78,7 +78,7 @@ household_emissions( PP_WD = 0, PS_WD = 0, PVC_WD = 0, - plastic_waste_disposal = c("Closed-loop", "Combustion", "Landfill", "Open-loop"), + plastic_waste_disposal = c("Landfill", "Open-loop", "Closed-loop", "Combustion"), units = c("kg", "tonnes") ) }