diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2017-07-21 21:47:04 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2017-07-21 21:47:04 +0200 |
commit | e621d0ea24081b3b5b3e324e8fd19422dd60e16f (patch) | |
tree | e3031f8839fd6f1619d814453c351d62ca05b54a /tests | |
parent | 092c6fdc8b8bbadd3724b4023de60b7f1fe1500f (diff) |
Only use 1 core to pass test on windows
Diffstat (limited to 'tests')
-rw-r--r-- | tests/testthat/test_parent_only.R | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/testthat/test_parent_only.R b/tests/testthat/test_parent_only.R index 1d100cca..9a3844cf 100644 --- a/tests/testthat/test_parent_only.R +++ b/tests/testthat/test_parent_only.R @@ -53,9 +53,9 @@ test_that("Fits for FOCUS A deviate less than 0.1% from median of values from FO # Fitting FOCUS A with FOMC is possible, but the correlation between # alpha and beta, when obtained, is 1.0000, and the fit does not - # converge using the Port algorithm, which yields a warning - expect_warning( - fit.A.FOMC <- try(list(mkinfit("FOMC", FOCUS_2006_A, quiet = TRUE)))) + # always converge using the Port algorithm (platform dependent), so + # we need to suppress a potential warning + suppressWarnings(fit.A.FOMC <- try(list(mkinfit("FOMC", FOCUS_2006_A, quiet = TRUE)))) if (!inherits(fit.A.FOMC, "try-error")) { |