diff options
Diffstat (limited to 'tests/testthat/test_mhmkin.R')
| -rw-r--r-- | tests/testthat/test_mhmkin.R | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/tests/testthat/test_mhmkin.R b/tests/testthat/test_mhmkin.R index eced5583..fc588473 100644 --- a/tests/testthat/test_mhmkin.R +++ b/tests/testthat/test_mhmkin.R @@ -9,10 +9,6 @@ test_that("Multiple hierarchical kinetic models can be fitted and diagnosed", { fits_synth_tc <- suppressWarnings( update(fits_synth_const, error_model = "tc")) - expect_known_output( - print(fits_synth_const), - "print_fits_synth_const.txt") - hfits <- mhmkin(list(fits_synth_const, fits_synth_tc)) expect_known_output( @@ -40,4 +36,13 @@ test_that("Multiple hierarchical kinetic models can be fitted and diagnosed", { expect_known_output(print(test_summary, digits = 1), "summary_hfit_sfo_tc.txt") + + # It depends on the platform exactly which of the + # SFO datasets fail to converge with FOMC + skip_on_travis() + + expect_known_output( + print(fits_synth_const), + "print_fits_synth_const.txt") + }) |