diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2023-04-16 06:19:00 +0200 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2023-04-16 06:22:11 +0200 |
commit | 76bc0fead33a63168a5e8d77a6c4b82426815d70 (patch) | |
tree | fbbd7598c47ed6c3ef41e7c4ed8e5795c3b71db6 /tests/testthat/test_mixed.R | |
parent | 7a5997609d4b53d6aacdf46245b01056564db838 (diff) |
Skip the Eigenvalue based saem test
It took too long, and this solution method is not recommended. We are
saving 140 seconds here on my system, so more time is saved on travis.
Diffstat (limited to 'tests/testthat/test_mixed.R')
-rw-r--r-- | tests/testthat/test_mixed.R | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/tests/testthat/test_mixed.R b/tests/testthat/test_mixed.R index c60d1421..8eb8e60c 100644 --- a/tests/testthat/test_mixed.R +++ b/tests/testthat/test_mixed.R @@ -123,14 +123,15 @@ test_that("SFO-SFO saemix specific analytical solution work", { expect_error(saem(mmkin_sfo_sfo, solution_type = "analytical"), "not supported") - saem_sfo_sfo_mkin_eigen<- saem(mmkin_sfo_sfo, solution_type = "eigen") - expect_equal( - endpoints(saem_sfo_sfo_saemix_analytical), - endpoints(saem_sfo_sfo_mkin_eigen)) - saem_sfo_sfo_mkin_desolve <- saem(mmkin_sfo_sfo, solution_type = "deSolve") expect_equal( endpoints(saem_sfo_sfo_saemix_analytical), endpoints(saem_sfo_sfo_mkin_desolve)) + skip("This is seldom used, so save some time") + + saem_sfo_sfo_mkin_eigen<- saem(mmkin_sfo_sfo, solution_type = "eigen") + expect_equal( + endpoints(saem_sfo_sfo_saemix_analytical), + endpoints(saem_sfo_sfo_mkin_eigen)) }) |