diff options
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)) |