R:使用带有吸墨纸的foreach,投资组合已经存在错误
我正在使用blotter包来运行一个回溯测试,并使用foreach来加快速度。我遇到了一个错误,blotter找到了同名的公文包,即使它们应该在函数开始时被删除。下面是重现错误的示例代码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
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环境中
没有尝试(rm(“account.Snazzy”、“portfolio.Snazzy”、pos=.blotter)、silent=TRUE)
工作.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)