diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-29 16:05:11 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2020-05-29 16:05:11 +0200 |
| commit | e6f9e9ca89e35e610d9895b979f1351a47451db0 (patch) | |
| tree | dd9d389c05e35db7a86abd578751199cd2c6a1be /tests/testthat/test_FOCUS_D_UBA_expertise.R | |
| parent | 510436646b1bdd5b8cfab70be29334bd3cc9c828 (diff) | |
Improve handling of warnings, reorganize tests
Diffstat (limited to 'tests/testthat/test_FOCUS_D_UBA_expertise.R')
| -rw-r--r-- | tests/testthat/test_FOCUS_D_UBA_expertise.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/testthat/test_FOCUS_D_UBA_expertise.R b/tests/testthat/test_FOCUS_D_UBA_expertise.R index 101c8e15..0a7e5219 100644 --- a/tests/testthat/test_FOCUS_D_UBA_expertise.R +++ b/tests/testthat/test_FOCUS_D_UBA_expertise.R @@ -5,7 +5,7 @@ context("Results for FOCUS D established in expertise for UBA (Ranke 2014)") test_that("Fits without formation fractions are correct for FOCUS D", { expect_warning( fit.noff <- mkinfit(SFO_SFO, FOCUS_D, quiet = TRUE), - "p-value.*Shapiro-Wilk") + "Shapiro-Wilk") expect_equal(round(as.numeric(endpoints(fit.noff)$distimes["parent", ]), 2), c(7.02, 23.33)) |