如何在r中并行化外部函数？

Question

我想使用外部函数构建列表中各种对象的相似性矩阵，并使用并行化代码以有效的方式进行。 在另一种方式中，如何在外部并行化 FUN，其中矩阵 <- 外部（X，Y，FUN，...）

我在 Windows 上使用 Rstudio 版本 1.2.1335 和 R x64 3.6.1。 这是一个简单的代码示例：

my_list <- list("a"=c("A", "B", "C") , "b"=c("B", "A", "D"), "c"=c("C", "A", "D"), "d"=c("D", "B", "C"))

my_matrix <- outer(my_list, my_list, Vectorize(function(x,y) getsimilarityscore(x,y), vectorize.args = c("x", "y")))

我期待一个具有相似性分数的矩阵。

Answer 1

我已经按照@F 的建议尝试了嵌套的 foreach。 隐私！ 它运作良好。 这是我使用的代码：

library(doParallel)
cl <- parallel::makeCluster("number of cores")
doParallel::registerDoParallel(cl)
my_matrix <- foreach(i = my_list, .combine = 'cbind', .packages = 'yourSimilarityPackage') %:%
  foreach(j = my_ist, .combine = 'c', .packages = 'yourSimilarityPackage') %dopar% {
    getsimilarityscore(i, j)
  }
stopCluster(cl = NULL)

那么您将需要更改矩阵的 col 和 rows 名称