diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-22 16:09:53 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-04-22 18:01:26 +0200 |
| commit | ae4ca17b89047052b35acee8e636ff8f31636c13 (patch) | |
| tree | 8d44949bc8b2a2c23a2e2896e12ff438252a1fe5 /tests/testthat/test_mkinfit_errors.R | |
| parent | f6b6ecd0f925799aaced3fb5ceb9e5817a99d884 (diff) | |
Support SFORB with formation fractions
Diffstat (limited to 'tests/testthat/test_mkinfit_errors.R')
| -rw-r--r-- | tests/testthat/test_mkinfit_errors.R | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/testthat/test_mkinfit_errors.R b/tests/testthat/test_mkinfit_errors.R index 7987d291..940e0b2e 100644 --- a/tests/testthat/test_mkinfit_errors.R +++ b/tests/testthat/test_mkinfit_errors.R @@ -7,6 +7,7 @@ test_that("mkinfit stops to prevent and/or explain user errors", { # We remove zero observations from FOCUS_2006_D beforehand in # order to avoid another expect_warning in the code FOCUS_2006_D <- subset(FOCUS_2006_D, value != 0) + # We get a warning if we use transform_fractions = FALSE with formation fractions # and an error if any pathway to sink is turned off as well expect_warning( @@ -14,7 +15,7 @@ test_that("mkinfit stops to prevent and/or explain user errors", { mkinfit(SFO_SFO.ff.nosink, FOCUS_2006_D, transform_fractions = FALSE, quiet = TRUE), "turn off pathways to sink" ), - "sum of formation fractions") + "sum of formation fractions may exceed one") expect_error(mkinfit(SFO_SFO.ff, FOCUS_2006_D, transform_fractions = TRUE, parms.ini = c(f_parent_to_m1 = 0.5), fixed_parms = "f_parent_to_m1", quiet = TRUE), |