在R中使用异步未来追加全局表

我试图创建一个全局表,该表由异步运行并行进程生成。它们是完全独立的,但是它们应该附加到相同的全局变量(这在R shiny中是反应性的,所以我要么需要在所有未来完成任务后有一个回调函数-这很好,但我不知道怎么做-要么我需要随着新结果的出现不断更新表)。

我尝试了以下只锁定的方法(可能是因为所有进程都分配给同一个变量,当我将“a”更改为“b”时,它会工作,但结果没有用处)

library("listenv")
library("future")
plan(multiprocess)
futureVals <- listenv()
options(future.globals.onMissing = "ignore")
a<-0
b<-0
for(i in 1:5){
  futureVals[[i]] <- futureAssign(x='a', value={
      a <- a+1
      print(a)
  })
}

futureVals2 <- as.list(futureVals)
print(a)

我怎样才能实现这个目标?