From 1e8172be565b856c8e6074a62736bc1686df6da8 Mon Sep 17 00:00:00 2001 From: Ranke Johannes Date: Thu, 1 Feb 2024 14:35:02 +0100 Subject: Improve formatting --- R/PEC_sw_drift.R | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'R') diff --git a/R/PEC_sw_drift.R b/R/PEC_sw_drift.R index b9d0bd5..eccb5bf 100644 --- a/R/PEC_sw_drift.R +++ b/R/PEC_sw_drift.R @@ -22,7 +22,8 @@ #' @author Johannes Ranke #' @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 @@ -95,14 +96,16 @@ PEC_sw_drift <- function(rate, #' # 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) -#' drift_percentages_rautmann(seq(10, 13, by = 0.2), crop_group = "fruit, early", formula = "FOCUS") -#' x <- seq(1, 30, by = 0.1) +#' # 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", #' xlab = "Distance of near edge [m]", -- cgit v1.2.1