From 435e07a6f7fd2599d783fd306ee6d9e08acc0c6b Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Fri, 27 Sep 2019 10:00:15 +0200 Subject: 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 --- docs/reference/EFSA_GW_interception_2014.html | 198 ++++++++++++++++++++++++++ 1 file changed, 198 insertions(+) create mode 100644 docs/reference/EFSA_GW_interception_2014.html (limited to 'docs/reference/EFSA_GW_interception_2014.html') diff --git a/docs/reference/EFSA_GW_interception_2014.html b/docs/reference/EFSA_GW_interception_2014.html new file mode 100644 index 0000000..c8d08fd --- /dev/null +++ b/docs/reference/EFSA_GW_interception_2014.html @@ -0,0 +1,198 @@ + + + + + + + + +Subset of EFSA crop interception default values for groundwater modelling — EFSA_GW_interception_2014 • pfm + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+ + + + +
+ +
+
+
+

Subset of EFSA crop interception default values for groundwater modelling

+ + +
+ +
+ +

Subset of EFSA crop interception default values for groundwater modelling

+ +
+ + +

Format

+ +

A matrix containing interception values, currently only for some selected crops

+ +

Source

+ +

European Food Safety Authority (2014) EFSA Guidance Document for +evaluating laboratory and field dissipation studies to obtain DegT50 values +of active substances of plant protection products and transformation +products of these active substances in soil. EFSA Journal +12(5):3662, 37 pp., doi:10.2903/j.efsa.2014.3662

+ + +

Examples

+ 
if (FALSE) {
+  # This is the code that was used to define the data
+  bbch <- paste0(0:9, "x")
+  crops <- c(
+    "Beans (field + vegetable)",
+    "Peas",
+    "Summer oilseed rape", "Winter oilseed rape",
+    "Tomatoes",
+    "Spring cereals", "Winter cereals")
+  EFSA_GW_interception_2014 <- matrix(NA, length(crops), length(bbch),
+    dimnames = list(Crop = crops, BBCH = bbch))
+  EFSA_GW_interception_2014["Beans (field + vegetable)", ] <-
+    c(0, 0.25, rep(0.4, 2), rep(0.7, 5), 0.8)
+  EFSA_GW_interception_2014["Peas", ] <-
+    c(0, 0.35, rep(0.55, 2), rep(0.85, 5), 0.85)
+  EFSA_GW_interception_2014["Summer oilseed rape", ] <-
+    c(0, 0.4, rep(0.8, 2), rep(0.8, 5), 0.9)
+  EFSA_GW_interception_2014["Winter oilseed rape", ] <-
+    c(0, 0.4, rep(0.8, 2), rep(0.8, 5), 0.9)
+  EFSA_GW_interception_2014["Tomatoes", ] <-
+    c(0, 0.5, rep(0.7, 2), rep(0.8, 5), 0.5)
+  EFSA_GW_interception_2014["Spring cereals", ] <-
+    c(0, 0, 0.2, 0.8, rep(0.9, 3), rep(0.8, 2), 0.8)
+  EFSA_GW_interception_2014["Winter cereals", ] <-
+    c(0, 0, 0.2, 0.8, rep(0.9, 3), rep(0.8, 2), 0.8)
+  save(EFSA_GW_interception_2014,
+    file = "../data/EFSA_GW_interception_2014.RData")
+}
+EFSA_GW_interception_2014
#>                            BBCH
+#> Crop                        0x   1x   2x   3x   4x   5x   6x   7x   8x   9x
+#>   Beans (field + vegetable)  0 0.25 0.40 0.40 0.70 0.70 0.70 0.70 0.70 0.80
+#>   Peas                       0 0.35 0.55 0.55 0.85 0.85 0.85 0.85 0.85 0.85
+#>   Summer oilseed rape        0 0.40 0.80 0.80 0.80 0.80 0.80 0.80 0.80 0.90
+#>   Winter oilseed rape        0 0.40 0.80 0.80 0.80 0.80 0.80 0.80 0.80 0.90
+#>   Tomatoes                   0 0.50 0.70 0.70 0.80 0.80 0.80 0.80 0.80 0.50
+#>   Spring cereals             0 0.00 0.20 0.80 0.90 0.90 0.90 0.80 0.80 0.80
+#>   Winter cereals             0 0.00 0.20 0.80 0.90 0.90 0.90 0.80 0.80 0.80
+
+ +
+ + + +
+ + + + + + + + -- cgit v1.2.1