Распараллелить несколько функций на одном объекте - PullRequest
Новая
       57

Распараллелить несколько функций на одном объекте

0 голосов
/ 16 февраля 2019

Благодаря ДЭВИДУ ШОЧУ я усилил его функцию и немного изменил, чтобы создать следующее.Работает отлично.

Теперь все, что мне нужно, - это вычислить эти переменные, т.е. запустить функции на графическом объекте H параллельно, возможно, используя purrr или furrr, чтобы выполнить это быстрее.Мои реальные данные велики с еще 30 функциями.Вывод должен быть таким же, как H_indices, показанный в последней строке кода. 

library(igraph); library(sna);  library(centiserve); library(tidygraph); library(tibble); library(expm)

H <- play_islands(5, 10, 0.8, 3)

all_indices <- function(g) {
  tibble(
    degree = igraph::degree(g),
    flowbet = sna::flowbet(get.adjacency(g,sparse=F)),
    communibet = centiserve::communibet(g))
  }

H_indices <- all_indices(H)
...