R 期权的并行继承

我使用的是

doParallel

，我想知道是否有一种简单的方法可以将

options（）

从我的全局环境导出到集群环境

目前，我正在使用

clusterExport

和

clusterEvalQ

opt1 = TRUE
opt2 = FALSE

clusterExport(
 cluster,
 c("opt1","opt2")
)

clusterEvalQ(
 cluster, {
   options("my_opt1" = opt1)
   options("my_opt2" = opt2)
   NULL
 } 
)

但我觉得这很笨重，也许有更好的方法