diff options
Diffstat (limited to 'tests/testthat/test_saemix_parent.R')
| -rw-r--r-- | tests/testthat/test_saemix_parent.R | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/tests/testthat/test_saemix_parent.R b/tests/testthat/test_saemix_parent.R index d8b6b19e..193dcdcd 100644 --- a/tests/testthat/test_saemix_parent.R +++ b/tests/testthat/test_saemix_parent.R @@ -10,8 +10,7 @@ test_that("Parent fits using saemix are correctly implemented", { # We did not introduce variance of parent_0 in the data generation # This is correctly detected expect_equal(illparms(sfo_saem_1), "sd(parent_0)") - # So we remove this variance - sfo_saem_1_reduced <- update(sfo_saem_1, no_random_effect = "parent_0") + # So we have also done a fit without this variance expect_equal(illparms(sfo_saem_1_reduced), character(0)) # We cannot currently do the fit with completely fixed initial values |