From f20ed2fd0d9629975b8a170ecdfed531ac9c906b Mon Sep 17 00:00:00 2001 From: Ranke Johannes Date: Wed, 6 Mar 2024 15:37:10 +0100 Subject: Update tests for PEC_sw_drift --- man/PEC_sw_drift.Rd | 3 ++- man/drift_percentages_rautmann.Rd | 9 ++++++--- 2 files changed, 8 insertions(+), 4 deletions(-) (limited to 'man') diff --git a/man/PEC_sw_drift.Rd b/man/PEC_sw_drift.Rd index 5d56c8a..63b330f 100644 --- a/man/PEC_sw_drift.Rd +++ b/man/PEC_sw_drift.Rd @@ -54,7 +54,8 @@ with input via spray drift. } \examples{ PEC_sw_drift(100) -# Alternatively, we can use the formula for a single application to "Ackerbau" from the paper +# Alternatively, we can use the formula for a single application to +# "Ackerbau" from the paper PEC_sw_drift(100, drift_data = "RF") # This makes it possible to also use different distances diff --git a/man/drift_percentages_rautmann.Rd b/man/drift_percentages_rautmann.Rd index 797d5f1..5fb2586 100644 --- a/man/drift_percentages_rautmann.Rd +++ b/man/drift_percentages_rautmann.Rd @@ -39,12 +39,15 @@ drift_percentages_rautmann(c(1, 3, 5), formula = "FOCUS") # One application to early or late fruit crops drift_data_JKI[[1]][as.character(c(3, 5, 20, 50)), "Obstbau frueh"] drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, early") -drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, early", formula = "FOCUS") +drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, early", + formula = "FOCUS") drift_data_JKI[[1]][as.character(c(3, 5, 20, 50)), "Obstbau spaet"] drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, late") -drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, late", formula = "FOCUS") +drift_percentages_rautmann(c(3, 5, 20, 50), crop_group = "fruit, late", + formula = "FOCUS") -# We get a continuum if the waterbody covers the hinge distance (11.4 m for 1 early app to fruit) +# We get a continuum if the waterbody covers the hinge distance +# (11.4 m for 1 early app to fruit) x <- seq(3, 30, by = 0.1) d <- drift_percentages_rautmann(x, crop_group = "fruit, early", formula = "FOCUS") plot(x, d, type = "l", -- cgit v1.2.1