aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat/test_nlme.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2022-07-12 14:07:55 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2022-07-12 14:07:55 +0200
commitac88a2fd793288d1d99046d32400974db82d85ea (patch)
treea780175cf1b98f1be02108d1cc731d2ee2d6da4a /tests/testthat/test_nlme.R
parentd7d5b31e9352090fa598f50979d706d8e753ef9c (diff)
Avoid spawning multiple cores in tests on CRAN
Diffstat (limited to 'tests/testthat/test_nlme.R')
-rw-r--r--tests/testthat/test_nlme.R4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/testthat/test_nlme.R b/tests/testthat/test_nlme.R
index a3bc9413..a1f267bb 100644
--- a/tests/testthat/test_nlme.R
+++ b/tests/testthat/test_nlme.R
@@ -25,7 +25,7 @@ test_that("nlme_function works correctly", {
d3 <- add_err(d_SFO_3, function(value) 4, n = 1, seed = 345678)
ds <- c(d1 = d1, d2 = d2, d3 = d3)
- f <- mmkin("SFO", ds, cores = 1, quiet = TRUE)
+ f <- mmkin("SFO", ds, cores = n_cores, quiet = TRUE)
mean_dp <- mean_degparms(f)
grouped_data <- nlme_data(f)
@@ -113,7 +113,7 @@ test_that("nlme_function works correctly in other cases", {
names(ds_me_sfo_5) <- paste("Dataset", 1:15)
dimnames(ds_me_sfo_5) <- list(Subset = 1:3, DT50 = dt50_in)
- f_me_sfo_5 <- mmkin("SFO", ds_me_sfo_5, quiet = TRUE)
+ f_me_sfo_5 <- mmkin("SFO", ds_me_sfo_5, cores = n_cores, quiet = TRUE)
ds_me_sfo_5_grouped_mkin <- nlme_data(f_me_sfo_5)
ds_me_sfo_5_mean_dp <- mean_degparms(f_me_sfo_5)

Contact - Imprint