From d66bd4aa0bf9c4d9b8793a4e308c9e80691b440f Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Sun, 12 Nov 2023 21:40:01 +0100 Subject: Enable links to source, upgrade to bootstrap 5 --- docs/reference/EFSA_GW_interception_2014.html | 247 ++++++++++---------------- 1 file changed, 89 insertions(+), 158 deletions(-) (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 index d7ec108..63e1730 100644 --- a/docs/reference/EFSA_GW_interception_2014.html +++ b/docs/reference/EFSA_GW_interception_2014.html @@ -1,193 +1,124 @@ - - - - - - - -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 — EFSA_GW_interception_2014 • pfm + Skip to contents + +
+
+
-
+

Subset of EFSA crop interception default values for groundwater modelling

- -

Format

- +
+

Format

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

-

Source

- +
+
+

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
-
- -
+
+

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