aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat/test_multistart.R
diff options
context:
space:
mode:
Diffstat (limited to 'tests/testthat/test_multistart.R')
-rw-r--r--tests/testthat/test_multistart.R8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/testthat/test_multistart.R b/tests/testthat/test_multistart.R
index 98d3fb6d..502cee98 100644
--- a/tests/testthat/test_multistart.R
+++ b/tests/testthat/test_multistart.R
@@ -3,16 +3,16 @@ context("Multistart method for saem.mmkin models")
test_that("multistart works for saem.mmkin models", {
skip_on_cran() # Save CRAN time
set.seed(123456)
- saem_sfo_s_multi <- multistart(sfo_saem_1_reduced, n = 8, cores = n_cores,
- no_random_effect = "parent_0")
+ saem_sfo_s_multi <- multistart(sfo_saem_1_reduced, n = 8, cores = n_cores)
anova_sfo <- anova(sfo_saem_1,
sfo_saem_1_reduced,
best(saem_sfo_s_multi),
test = TRUE
)
# On winbuilder, sfo_saem_1 gives an AIC of 1310.8, while we get 1311.7
- # locally on Linux and Windows. The other, well-determined fits
- # both give 1309.7
+ # locally (using saemix 3.2, which likely makes the difference due to the
+ # error parameter patch) on Linux and Windows. The other, well-determined
+ # fits both give 1309.7.
expect_equal(round(anova_sfo, 1)["sfo_saem_1_reduced", "AIC"], 1309.7)
expect_equal(round(anova_sfo, 1)["best(saem_sfo_s_multi)", "AIC"], 1309.7)
expect_true(anova_sfo[3, "Pr(>Chisq)"] > 0.2) # Local: 1, CRAN: 0.4

Contact - Imprint