R中的并行cpp函数？

Question

所以我有2个自定义Rcpp函数CustFunc1(x,y)和CustFunc2(a,b) 。 两者都对计算有要求（因此是c ++）。 我的问题是R中是否可以与dopar包同时运行？ 还是可以进行系统调用以直接访问cpp代码并尝试通过某些命令行工具并行执行？

现在的流程是：

result1=CustFunc(x,y) ##Takes 20 minutes
result2=CustFunc(a,b) ## Take 20 minutes

get_both <- function(x) {
foreach(i = seq_along(x)) %dopar% {
result1=CustFunc(x,y)
result2=CustFunc(a,b)
}
}
get_both$result1 == result1 #???
get_both$result2 == result2 ##??

Answer 1

如果您的函数大约需要20分钟，那么我真的会考虑使用RcppPaallel包重写它们，这并不比直接cpp难得多。 这样，您可以使用更多线程，但一次只能运行一个函数。 当我用自己的代码执行此操作时，我将计算时间从大约15分钟减少到不到2分钟。