diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2018-09-27 18:58:32 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2018-09-27 18:58:32 +0200 |
| commit | eab95c62479d732cbd531ad67ea458d2744af420 (patch) | |
| tree | 0143ea2d61afb47cf9757ac1c2efe84b9bf8c40f /R | |
| parent | 8452daa2015aa645dcc1eca3ec2bba5726603e4e (diff) | |
Create valid Step 1 files with fewer arguments
Diffstat (limited to 'R')
| -rw-r--r-- | R/PEC_sw_focus.R | 4 |
1 files changed, 4 insertions, 0 deletions
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 |