我必须从纽约证券交易所下载纽约证券交易所所有股票的纽约证券交易所历史最终价格。这是工作脚本,花了将近20分钟来下载600多只股票的数据。我有强大的服务器,并希望并行下载这些。我怎么能这样做?
for(val in stocks$V1) {
url <- paste(paste("http://real-chart.finance.yahoo.com/table.csv?s=", val, sep=""), "&a=11&b=12&c=1980&d=9&e=28&f=2015&g=d&ignore=.csv", sep="")
file_name <- paste(paste("/Users/usdgadiraj/Research/BigData/data/nyse/rscript/", val, sep=""), ".csv", sep="")
download.file(url, file_name)
}
答案 0 :(得分:0)
使用foreach
包和%dopar%
功能。您需要使用系统特定的并行后端,具体取决于您的操作系统,并从那里注册您的群集。有关详细信息,请参阅以下链接:
https://cran.r-project.org/web/packages/foreach/vignettes/foreach.pdf