Update accept_reject

prdm0 · Apr 23, 2024 · c683837 · c683837
1 parent 2508dd5
commit c683837
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/accept_reject.r b/R/accept_reject.r
@@ -245,7 +245,7 @@ accept_reject <-
           mc.cores = n_cores
           )))
     } else if(parallel && .Platform$OS.type == "windows"){
-      cl <- parallel::makeCluster(getOption("cl.cores", 2L))
+      cl <- parallel::makeCluster(getOption("cl.cores", 1L))
       capture.output(
         r <- unlist(parallel::parLapply(
           X = n_each_core,