aboutsummaryrefslogtreecommitdiff
path: root/R/mmkin.R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2021-04-21 13:11:47 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2021-04-21 13:11:47 +0200
commitc74b79c983fe9fc872bac1262040e82f16049477 (patch)
treea071ede8d02b1e1db07527a14afb2313cba9f69e /R/mmkin.R
parent3a5463672c297b37c3c9135c8b144c48744c05d0 (diff)
Version 1.0.4 published yesterdayv1.0.4
Diffstat (limited to 'R/mmkin.R')
-rw-r--r--R/mmkin.R5
1 files changed, 3 insertions, 2 deletions
diff --git a/R/mmkin.R b/R/mmkin.R
index 030fb27b..fe04129e 100644
--- a/R/mmkin.R
+++ b/R/mmkin.R
@@ -13,7 +13,8 @@
#' is only used when the \code{cluster} argument is \code{NULL}. On Windows
#' machines, cores > 1 is not supported, you need to use the \code{cluster}
#' argument to use multiple logical processors. Per default, all cores
-#' detected by [parallel::detectCores()] are used.
+#' detected by [parallel::detectCores()] are used, except on Windows where
+#' the default is 1.
#' @param cluster A cluster as returned by \code{\link{makeCluster}} to be used
#' for parallel execution.
#' @param \dots Further arguments that will be passed to \code{\link{mkinfit}}.
@@ -75,7 +76,7 @@
#'
#' @export mmkin
mmkin <- function(models = c("SFO", "FOMC", "DFOP"), datasets,
- cores = parallel::detectCores(), cluster = NULL, ...)
+ cores = if (Sys.info()["sysname"] == "Windows") 1 else parallel::detectCores(), cluster = NULL, ...)
{
call <- match.call()
parent_models_available = c("SFO", "FOMC", "DFOP", "HS", "SFORB", "IORE", "logistic")

Contact - Imprint