aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2023-04-16 06:19:00 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2023-04-16 06:22:11 +0200
commit76bc0fead33a63168a5e8d77a6c4b82426815d70 (patch)
treefbbd7598c47ed6c3ef41e7c4ed8e5795c3b71db6 /tests
parent7a5997609d4b53d6aacdf46245b01056564db838 (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')
-rw-r--r--tests/testthat/test_mixed.R11
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))
})

Contact - Imprint