diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2019-09-27 10:00:15 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2019-09-27 11:08:53 +0200 |
commit | 435e07a6f7fd2599d783fd306ee6d9e08acc0c6b (patch) | |
tree | bd47fa18a307349eabf4ecfff7ea8da81f5bb654 /R/SSLRC_mobility_classification.R | |
parent | 803fe13e505960fddccdbd4dcb524715f5eb068d (diff) |
Fix for UK drainage, some EFSA interception and washoff
- PEC_sw_drainage_UK() gave results that were a little bit too high
for the substances with the highest Koc (>4000), as I used 0.01% instead
of 0.008% for them. This must have come from an old vesion of the UK
data requirements handbook, at least I do not have another explanation
- Add EFSA interception (from 2014 DegT50 guidance) and tier 1
crop wash-off factors (from 2017 PEC soil guidance) for some major
arable crops
- Update docs
Diffstat (limited to 'R/SSLRC_mobility_classification.R')
-rw-r--r-- | R/SSLRC_mobility_classification.R | 17 |
1 files changed, 13 insertions, 4 deletions
diff --git a/R/SSLRC_mobility_classification.R b/R/SSLRC_mobility_classification.R index 2f8fb34..602f166 100644 --- a/R/SSLRC_mobility_classification.R +++ b/R/SSLRC_mobility_classification.R @@ -1,4 +1,4 @@ -# Copyright (C) 2015,2018 Johannes Ranke +# Copyright (C) 2015,2018,2019 Johannes Ranke # Contact: jranke@uni-bremen.de # This file is part of the R package pfm @@ -17,30 +17,39 @@ #' Determine the SSLRC mobility classification for a chemical substance from its Koc #' -#' This implements the method specified in the UK data requirements handbook and was +#' This implements the method specified in the UK data requirements handbook and was #' checked against the spreadsheet published on the CRC website #' #' @param Koc The sorption coefficient normalised to organic carbon in L/kg #' @return A list containing the classification and the percentage of the #' compound transported per 10 mm drain water +#' @references HSE's Chemicals Regulation Division (CRD) Active substance +#' PECsw calculations (for UK specific authorisation requests) +#' \url{https://www.hse.gov.uk/pesticides/topics/pesticide-approvals/pesticides-registration/data-requirements-handbook/fate/active-substance-uk.htm} +#' accessed 2019-09-27 +#' +#' Drainage PECs Version 1.0 (2015) Spreadsheet published at +#' \url{https://www.hse.gov.uk/pesticides/topics/pesticide-approvals/pesticides-registration/data-requirements-handbook/fate/pec-tools-2015/PEC\%20sw-sed\%20(drainage).xlsx} +#' accessed 2019-09-27 #' @export #' @author Johannes Ranke #' @examples #' SSLRC_mobility_classification(100) +#' SSLRC_mobility_classification(10000) SSLRC_mobility_classification <- function(Koc) { if (!is.numeric(Koc) | length(Koc) != 1) stop("Please give a single number") if (is.na(Koc)) { result <- list(NA, NA) } else { - result <- list("Non mobile", 0.01) + result <- list("Non mobile", 0.008) if (Koc < 4000) result <- list("Slightly mobile", 0.02) if (Koc < 1000) result <- list("Slightly mobile", 0.5) if (Koc < 500) result <- list("Moderately mobile", 0.7) if (Koc < 75) result <- list("Mobile", 1.9) if (Koc < 15) result <- list("Very mobile", 1.9) } - names(result) <- c("Mobility classification", + names(result) <- c("Mobility classification", "Percentage drained per mm of drain water") return(result) } |