aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat/test_f_time_norm.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2022-03-01 16:59:30 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2022-03-01 17:56:11 +0100
commit1ba0938b5a39f9d376b54fe3469b40aafea9e8e3 (patch)
tree4e7e67855246d59a04d2eb0f18646fcc9460e020 /tests/testthat/test_f_time_norm.R
parentccae8c02b1e6a30911b9d1efdb388f30f9c9cb78 (diff)
Avoid using cat() for default output, tests
Diffstat (limited to 'tests/testthat/test_f_time_norm.R')
-rw-r--r--tests/testthat/test_f_time_norm.R7
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/testthat/test_f_time_norm.R b/tests/testthat/test_f_time_norm.R
index c5e0607c..d5b89902 100644
--- a/tests/testthat/test_f_time_norm.R
+++ b/tests/testthat/test_f_time_norm.R
@@ -5,13 +5,12 @@ test_that("Simple temperature and moisture normalisation works", {
})
test_that("Time step normalisation for a dataset works", {
- expect_output(f_time_norm_focus(D24_2014, study_moisture_ref_source = "focus", f_na = 1),
- "was set to")
+ expect_message(f_time_norm_focus(D24_2014, study_moisture_ref_source = "focus", f_na = 1))
expect_equal(round(D24_2014$f_time_norm, 3), c(1.606, 0.712, 0.716, 0.716, 0.898))
- expect_output(f_time_norm_focus(dimethenamid_2018), "was set to")
+ expect_message(f_time_norm_focus(dimethenamid_2018))
# Reference values from Dimethenamid RAR 2018 Vol3 B.8
- expect_equal(round(dimethenamid_2018$f_time_norm, 3),
+ expect_equal(round(dimethenamid_2018$f_time_norm, 3),
c(1,
0.971, # p. 56
rep(round(1.329 * 0.924, 3), 2), # p. 51

Contact - Imprint