R:使用带有吸墨纸的foreach,投资组合已经存在错误

R:使用带有吸墨纸的foreach,投资组合已经存在错误,r,foreach,parallel-processing,quantstrat,blotter,R,Foreach,Parallel Processing,Quantstrat,Blotter,我正在使用blotter包来运行一个回溯测试,并使用foreach来加快速度。我遇到了一个错误,blotter找到了同名的公文包,即使它们应该在函数开始时被删除。下面是重现错误的示例代码 require('foreach') require('doSNOW') require('xts') require('blotter') backtestFunction <- function() { currency("USD") stock("AAPL", currency="USD

我正在使用blotter包来运行一个回溯测试,并使用foreach来加快速度。我遇到了一个错误,blotter找到了同名的公文包,即使它们应该在函数开始时被删除。下面是重现错误的示例代码

require('foreach')
require('doSNOW')
require('xts')
require('blotter')

backtestFunction <- function() {

  currency("USD")
  stock("AAPL", currency="USD", multiplier=1)
  Sys.setenv(TZ="US/Eastern")
  verbose = FALSE

  try(rm("account.Snazzy","portfolio.Snazzy",pos=.blotter),silent=TRUE)
  initPortf("Snazzy", "AAPL", initDate="2014-01-01", currency="USD")
  initAcct("Snazzy", portfolios="Snazzy", initDate="2014-01-01", initEq=1000, currency="USD")

  return (TRUE)
}

cl <- snow::makeCluster(8, type = "SOCK")
registerDoSNOW(cl)

results <- foreach(i=1:100, .combine=rbind, .packages=c('xts','blotter')) %dopar% {
  return (backtestFunction())
}
snow::stopCluster(cl)
Error in { : 
  task 9 failed - "Portfolio Snazzy already exists, use updatePortf() or addPortfInstr() to update it."
但是,我知道投资组合和帐户对象存储在.blotter环境中

  • foreach会不会在新的R会话中产生每个工作进程,这样就不会有冲突
  • 为什么
    没有尝试(rm(“account.Snazzy”、“portfolio.Snazzy”、pos=.blotter)、silent=TRUE)
    工作
  • 我怎样才能让foreach在这里使用吸墨纸
  • 如果有必要的话,我正在使用R3.0.2,在Windows上运行RStudio。我将quantstrat包括在标签中,因为它们通常一起使用,所以有经验的quantstrat用户可能知道修复方法。谢谢

    问题在于“.blotter”会自动导出到工人,但会导出到doSNOW的“导出”环境,而不是全球环境。这不会混淆blotter包,但它确实会阻止“rm”命令从真实的.blotter环境中删除“account.Snazzy”和“portfolio.Snazzy”

    一种解决方案是将
    .noexport=“.blotter”
    添加到foreach。另一种解决方案是在执行“rm”时更明确地指定环境:


    doSNOW不会为每个任务生成一个worker,因为这可能会非常慢。即使对于本地工作人员来说,启动R会话的时间与执行任务的时间相比也非常重要,特别是在使用ssh的集群上。更重要的是,如果工作人员执行多个任务,您可以一次性向他们发送大型数据集,并将这些数据重新用于许多任务,从而分摊通信成本。

    感谢Steve的澄清!我进一步挖掘,只是为了向其他人提供更多细节,功能的评估环境被foreach/doSNOW创建的临时环境所包围,而临时环境又被全局环境所包围。因此,当“.blotter”被导出到临时环境中时,临时环境和全球环境中都存在“.blotter”。“rm”命令锁定了临时环境中的一个,而blotter包使用了全局环境中的一个。doMPI、doRedis和向doParallel注册集群对象时也使用相同的技术。这个临时环境就是我所说的“导出”环境。
    try(rm("account.Snazzy","portfolio.Snazzy",pos=.GlobalEnv$.blotter),
        silent=TRUE)