From 76bc0fead33a63168a5e8d77a6c4b82426815d70 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Sun, 16 Apr 2023 06:19:00 +0200 Subject: 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. --- tests/testthat/test_mixed.R | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'tests') 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)) }) -- cgit v1.2.1