From 904a86fa92f1577414f2fce2bdbfe21e12381106 Mon Sep 17 00:00:00 2001 From: Ranke Johannes Date: Thu, 1 Feb 2024 10:39:53 +0100 Subject: Calculate drift percentages and PECsw using the Rautmann formula --- docs/reference/PEC_sw_drift.html | 30 ++++-- docs/reference/drift_parameters_focus.html | 26 +++-- .../drift_percentages_rautmann_formula.html | 114 +++++++++++++++++++++ docs/reference/index.html | 5 + 4 files changed, 160 insertions(+), 15 deletions(-) create mode 100644 docs/reference/drift_percentages_rautmann_formula.html (limited to 'docs/reference') diff --git a/docs/reference/PEC_sw_drift.html b/docs/reference/PEC_sw_drift.html index d4cd191..8c5bc3a 100644 --- a/docs/reference/PEC_sw_drift.html +++ b/docs/reference/PEC_sw_drift.html @@ -60,7 +60,10 @@ with input via spray drift.

water_depth = 30, drift_percentages = NULL, drift_data = c("JKI", "RF"), - crop = "Ackerbau", + crop_group_JKI = c("Ackerbau", "Obstbau frueh", "Obstbau spaet", "Weinbau frueh", + "Weinbau spaet", "Hopfenbau", "Flaechenkulturen > 900 l/ha", "Gleisanlagen"), + crop_group_focus = c("arable", "hops", "vines, late", "vines, early", "fruit, late", + "fruit, early", "aerial"), distances = c(1, 5, 10, 20), rate_units = "g/ha", PEC_units = "µg/L" @@ -92,8 +95,13 @@ included in the package is used. If 'RF', the Rautmann formula is used, if implemented for the crop type and number of applications

-
crop
-

Crop name (use German names for JKI data), defaults to "Ackerbau"

+
crop_group_JKI
+

When using the 'JKI' drift data, one of the German names +as used in drift_parameters_focus.

+ + +
crop_group_focus
+

One of the crop groups as used in drift_parameters_focus

distances
@@ -127,14 +135,22 @@ implemented for the crop type and number of applications

# Alternatively, we can use the formula for a single application to "Ackerbau" from the paper PEC_sw_drift(100, drift_data = "RF") #> 1 m 5 m 10 m 20 m -#> 0.92350000 0.19114149 0.09699222 0.04921742 +#> 0.91976667 0.19064473 0.09680051 0.04915079 -# This makes it possible to also use different substances +# This makes it possible to also use different distances PEC_sw_drift(100, distances = c(1, 3, 5, 6, 10, 20, 50, 100), drift_data = "RF") #> 1 m 3 m 5 m 6 m 10 m 20 m 50 m -#> 0.92350000 0.31512171 0.19114149 0.15990435 0.09699222 0.04921742 0.02007497 +#> 0.91976667 0.31415827 0.19064473 0.15951494 0.09680051 0.04915079 0.02006434 +#> 100 m +#> 0.01018774 + +# or consider aerial application +PEC_sw_drift(100, distances = c(1, 3, 5, 6, 10, 20, 50, 100), drift_data = "RF", + crop_group_focus = "aerial") +#> 1 m 3 m 5 m 6 m 10 m 20 m 50 m +#> 16.8233333 11.0585820 9.0986174 8.4866460 6.9825178 4.7004640 1.8820816 #> 100 m -#> 0.01018678 +#> 0.9417586 # Using custom drift percentages is also supported PEC_sw_drift(100, drift_percentages = c(2.77, 0.95, 0.57, 0.48, 0.29, 0.15, 0.06, 0.03)) diff --git a/docs/reference/drift_parameters_focus.html b/docs/reference/drift_parameters_focus.html index 4c7539a..c3f6386 100644 --- a/docs/reference/drift_parameters_focus.html +++ b/docs/reference/drift_parameters_focus.html @@ -63,6 +63,13 @@ as its licence is not clear.

Format

A tibble::tibble.

+
+
+

Details

+

For the hinge distance, Inf was substituted for the cases where no hinge +distance is given in the data, in this way parameters C and D are never +used for any distance if A and B are used for the case that the distance +is smaller than the hinge distance.

References

@@ -84,17 +91,20 @@ Bundesanst. Land- Forstwirtsch. 383, 133-141

#> # A tibble: 49 × 8 #> crop_group n_apps percentile A B C D hinge #> <chr> <int> <int> <dbl> <dbl> <dbl> <dbl> <dbl> -#> 1 arable 1 90 2.76 -0.978 NA NA NA -#> 2 arable 2 82 2.44 -1.01 NA NA NA -#> 3 arable 3 77 2.02 -0.996 NA NA NA -#> 4 arable 4 74 1.86 -0.986 NA NA NA -#> 5 arable 5 72 1.79 -0.994 NA NA NA -#> 6 arable 6 70 1.63 -0.986 NA NA NA -#> 7 arable 7 69 1.58 -0.981 NA NA NA -#> 8 arable 8 67 1.51 -0.983 NA NA NA +#> 1 arable 1 90 2.76 -0.978 NA NA Inf +#> 2 arable 2 82 2.44 -1.01 NA NA Inf +#> 3 arable 3 77 2.02 -0.996 NA NA Inf +#> 4 arable 4 74 1.86 -0.986 NA NA Inf +#> 5 arable 5 72 1.79 -0.994 NA NA Inf +#> 6 arable 6 70 1.63 -0.986 NA NA Inf +#> 7 arable 7 69 1.58 -0.981 NA NA Inf +#> 8 arable 8 67 1.51 -0.983 NA NA Inf #> 9 hops 1 90 58.2 -1.00 8655. -2.84 15.3 #> 10 hops 2 82 66.2 -1.20 5555. -2.82 15.3 #> # ℹ 39 more rows +unique(drift_parameters_focus$crop_group) +#> [1] "arable" "hops" "vines, late" "vines, early" "fruit, late" +#> [6] "fruit, early" "aerial"