diff options
author | Ranke Johannes <johannes.ranke@agroscope.admin.ch> | 2024-01-31 13:16:17 +0100 |
---|---|---|
committer | Ranke Johannes <johannes.ranke@agroscope.admin.ch> | 2024-01-31 13:27:50 +0100 |
commit | aed160d7f0eaf5865e2bd9bf6c4b1c9d7b13d911 (patch) | |
tree | 7ca136834857c12449f50a1e086a589cc9b79e2e /R/EFSA_washoff_2017.R | |
parent | 64f629efbe666bae56f48a309adf33d1eb09c358 (diff) |
Reorganise data generation
- Use inst/data_generation for R code generating data as in some of my other packages
- data/*.RData files were checked using https://github.com/jranke/dotfiles/blob/main/bin/rda_diff
contents were not changed
- Remove ChangeLog, the history is in the git logs
- Update docs and some links contained therein
- use \doi{} markup
- Move logs to log directory
Diffstat (limited to 'R/EFSA_washoff_2017.R')
-rw-r--r-- | R/EFSA_washoff_2017.R | 30 |
1 files changed, 1 insertions, 29 deletions
diff --git a/R/EFSA_washoff_2017.R b/R/EFSA_washoff_2017.R index 450c12e..59e299c 100644 --- a/R/EFSA_washoff_2017.R +++ b/R/EFSA_washoff_2017.R @@ -10,33 +10,5 @@ #' doi:10.2903/j.efsa.2017.4982 #' @format A matrix containing wash-off factors, currently only for some selected crops #' @examples -#' \dontrun{ -#' # 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_washoff_2017 <- matrix(NA, length(crops), length(bbch), -#' dimnames = list(Crop = crops, BBCH = bbch)) -#' EFSA_washoff_2017["Beans (field + vegetable)", ] <- -#' c(NA, 0.6, rep(0.75, 2), rep(0.8, 5), 0.35) -#' EFSA_washoff_2017["Peas", ] <- -#' c(NA, 0.4, rep(0.6, 2), rep(0.65, 5), 0.35) -#' EFSA_washoff_2017["Summer oilseed rape", ] <- -#' c(NA, 0.4, rep(0.5, 2), rep(0.6, 5), 0.5) -#' EFSA_washoff_2017["Winter oilseed rape", ] <- -#' c(NA, 0.1, rep(0.4, 2), rep(0.55, 5), 0.3) -#' EFSA_washoff_2017["Tomatoes", ] <- -#' c(NA, 0.55, rep(0.75, 2), rep(0.7, 5), 0.35) -#' EFSA_washoff_2017["Spring cereals", ] <- -#' c(NA, 0.4, 0.5, 0.5, rep(0.65, 3), rep(0.65, 2), 0.55) -#' EFSA_washoff_2017["Winter cereals", ] <- -#' c(NA, 0.1, 0.4, 0.6, rep(0.55, 3), rep(0.6, 2), 0.4) -#' save(EFSA_washoff_2017, -#' file = "../data/EFSA_washoff_2017.RData") -#' } #' EFSA_washoff_2017 -NULL +"EFSA_washoff_2017" |