Question

谁正在打开＆＃34;文件＆＃34;并没有关闭？

     library(quantmod)
     nyse.symbols<-stockSymbols("NYSE")
     nasdaq.symbols<-stockSymbols("NASDAQ")
     sym<-c(nasdaq.symbols$Symbol,nyse.symbols$Symbol)
     lapply(sym, function(x) {cat(x,sep="\n");tryCatch(getSymbols(x,from=Sys.Date()-365),error=function(e) e,warning=function(e) e);closeAllConnections()})/ 
     symbols <- sym[sym %in% ls()]
     for(i in symbols) {
       wfile <- file(paste("../data/",as.character(i),".txt",sep=""),open="wt")
       write.table(as.data.frame(get(i)), file=wfile,row.names=TRUE)
       close(wfile)
     }

不幸的是，这个简单的代码无法成功完成错误＆＃34;太多的打开文件＆＃34;。

这里有什么帮助吗？感谢...

Answer 1

你需要更加小心你的联系。打开一个，使用它，关闭它。

请参阅help(Connections) - 它们随处可用于文件访问，数据访问......但是没有理由不能访问几千个符号。但管理你的资源。

R中的quantmod：打开的文件太多了

1 个答案: