aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/testthat/test_parent_only.R6
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")) {

Contact - Imprint