diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2022-10-25 16:12:39 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2022-10-25 16:12:39 +0200 |
commit | 92bd47bf45cebe660c5e7f392a4ee19f704d8a19 (patch) | |
tree | 4d27b810581f0e636635b39364cab57f114ec16d /tests/testthat/test_mhmkin.R | |
parent | cc89d84cf5c3389cdeee8e62f3bed54b89ce2764 (diff) |
Address platform dependencies that surfaced on travis
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") + }) |