aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog6
-rw-r--r--DESCRIPTION2
-rw-r--r--R/PEC_sw_focus.R4
3 files changed, 11 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 37e9c30..059b453 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+commit 8452daa2015aa645dcc1eca3ec2bba5726603e4e
+Author: Johannes Ranke <jranke@uni-bremen.de>
+Date: 2018-09-22 09:54:59 +0200
+
+ Add test and update docs
+
commit ff7e67a4d3415419dd3f712ef1af7467ebf65508
Author: Johannes Ranke <jranke@uni-bremen.de>
Date: 2018-09-21 19:39:44 +0200
diff --git a/DESCRIPTION b/DESCRIPTION
index e526ff0..1483745 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -2,7 +2,7 @@ Package: pfm
Type: Package
Title: Utilities for Pesticide Fate Modelling
Version: 0.5.2
-Date: 2018-09-22
+Date: 2018-09-26
Authors@R: person("Johannes Ranke", email = "jranke@uni-bremen.de",
role = c("aut", "cre", "cph"),
comment = c(ORCID = "0000-0003-4371-6538"))
diff --git a/R/PEC_sw_focus.R b/R/PEC_sw_focus.R
index e2c3e54..7c65e24 100644
--- a/R/PEC_sw_focus.R
+++ b/R/PEC_sw_focus.R
@@ -128,6 +128,10 @@ PEC_sw_focus <- function(parent, rate, n = 1, i = NA,
}
on.exit(close(txt))
+ scenario = match.arg(scenario)
+ region = match.arg(region)
+ season = match.arg(season)
+ interception = match.arg(interception)
if (is.null(met)) {
compound = parent$name

Contact - Imprint