aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat/test_irls.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2018-11-23 21:19:58 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2018-11-23 21:19:58 +0100
commit82bf34f1b0db8d202abf8cd4f5b6ce8b8aecfc1a (patch)
tree4275f70d5ff1ca251715872ce5727bc9a9f062a2 /tests/testthat/test_irls.R
parent288ee4e9cc0959d5663d5079d505c81f802b963b (diff)
Relax yet another test...
Diffstat (limited to 'tests/testthat/test_irls.R')
-rw-r--r--tests/testthat/test_irls.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/testthat/test_irls.R b/tests/testthat/test_irls.R
index 5f5b56bf..90d9cb95 100644
--- a/tests/testthat/test_irls.R
+++ b/tests/testthat/test_irls.R
@@ -80,7 +80,7 @@ test_that("Reweighting method 'tc' works", {
f_tc_100_1 <- suppressWarnings(mkinfit(DFOP, d_100_1[[1]], reweight.method = "tc", quiet = TRUE))
parm_errors_100_1 <- (f_tc_100_1$bparms.optim - parms_DFOP_optim) / parms_DFOP_optim
- expect_true(all(abs(parm_errors_100_1) < 0.05))
+ expect_true(all(abs(parm_errors_100_1) < 0.07))
tcf_100_1_error_model_errors <- (f_tc_100_1$tc_fitted - c(0.5, 0.07)) /
c(0.5, 0.07)

Contact - Imprint