[英]How to switch programmatically between %do% and %dopar% in foreach?
通过在使用foreach时将%dopar%更改为%do%,我可以按顺序运行代码。 我该如何以编程方式执行此操作?
例如,我想要以下但只有一个foreach声明:
library(doParallel)
library(foreach)
registerDoParallel(cores = 4)
runner <- function(parallel = FALSE) {
if (parallel)
foreach(i=1:10) %dopar% {
print(i)
}
else
foreach(i=1:10) %do% {
print(i)
}
}
runner()
runner(TRUE)
您可以使用ifelse
来选择中缀函数:
runner <- function(parallel = FALSE) {
`%myinfix%` <- ifelse(parallel, `%dopar%`, `%do%`)
foreach(i=1:10) %myinfix% {
print(i)
}
}
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.