Update accept-reject function

prdm0 · Apr 23, 2024 · c2f6f3c · c2f6f3c
1 parent 24dc827
commit c2f6f3c
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/accept_reject.r b/R/accept_reject.r
@@ -246,6 +246,7 @@ accept_reject <-
           mc.cores = n_cores
           )))
     } else if (parallel && .Platform$OS.type == "windows") {
+      n_cores <- parallel::detectCores()
       cl <- parallel::makeCluster(n_cores)
       capture.output(
         r <- unlist(parallel::parLapply(