1 files changed, 4 insertions, 28 deletions
diff --git a/man/EFSA_washoff_2017.Rd b/man/EFSA_washoff_2017.Rd
index e153fbe..28c50df 100644
--- a/man/EFSA_washoff_2017.Rd
+++ b/man/EFSA_washoff_2017.Rd
@@ -14,37 +14,13 @@ European Food Safety Authority (2017) EFSA guidance document for
   in soil. \emph{EFSA Journal} \bold{15}(10) 4982
   doi:10.2903/j.efsa.2017.4982
 }
+\usage{
+EFSA_washoff_2017
+}
 \description{
 Subset of EFSA crop washoff default values
 }
 \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
 }
+\keyword{datasets}