diff options
Diffstat (limited to 'tests/testthat/test_twa.R')
| -rw-r--r-- | tests/testthat/test_twa.R | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tests/testthat/test_twa.R b/tests/testthat/test_twa.R index d5c0b98b..a84b2c4e 100644 --- a/tests/testthat/test_twa.R +++ b/tests/testthat/test_twa.R @@ -18,11 +18,13 @@ context("Calculation of maximum time weighted average concentrations (TWAs)") -twa_models <- c("SFO", "FOMC", "DFOP") -fits <- mmkin(twa_models, list(FOCUS_D = FOCUS_2006_D), - quiet = TRUE, cores = 1) test_that("Time weighted average concentrations are correct", { + skip_on_cran() + twa_models <- c("SFO", "FOMC", "DFOP") + fits <- mmkin(twa_models, list(FOCUS_D = FOCUS_2006_D), + quiet = TRUE, cores = 1) + outtimes_7 <- seq(0, 7, length.out = 10000) for (model in twa_models) { fit <- fits[[model, 1]] |