aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat/test_PEC_sw_drift.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2024-04-10 16:32:06 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2024-04-10 16:32:06 +0200
commit9e62ed638e530a5cebebf491de055caca49a56ef (patch)
treeb65c10389b80e69fcbfd36dcbae35c239d06e720 /tests/testthat/test_PEC_sw_drift.R
parentdd203e9f266e50bb457bc0fc247267115ae941d2 (diff)
Improve docs, fail with erroneus crop_group arguments
PEC_sw_drift: The argument 'crop_group_focus' was renamed to 'crop_group_RF' to make it easier to understand the relation to the 'drift_data' argument.
Diffstat (limited to 'tests/testthat/test_PEC_sw_drift.R')
-rw-r--r--tests/testthat/test_PEC_sw_drift.R4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/testthat/test_PEC_sw_drift.R b/tests/testthat/test_PEC_sw_drift.R
index a0972eb..7e3b965 100644
--- a/tests/testthat/test_PEC_sw_drift.R
+++ b/tests/testthat/test_PEC_sw_drift.R
@@ -25,7 +25,7 @@ test_that("The Rautmann formula is correctly implemented", {
expect_equal(pfm_jki, pfm_rf, tolerance = 0.01)
expect_error(PEC_sw_drift(100, drift_data = "RF", applications = 10), "Only 1 to 8 applications")
- expect_error(PEC_sw_drift(100, drift_data = "RF", applications = 1, crop_group_focus = "Obstbau spaet"),
+ expect_error(PEC_sw_drift(100, drift_data = "RF", applications = 1, crop_group_RF = "Obstbau spaet"),
"should be one of")
- expect_silent(PEC_sw_drift(100, drift_data = "RF", applications = 1, crop_group_focus = "fruit, late"))
+ expect_silent(PEC_sw_drift(100, drift_data = "RF", applications = 1, crop_group_RF = "fruit, late"))
})

Contact - Imprint