R 通过quantmod下载大量财务数据

有一个for R包。此外，还要求提供财务数据

getFinancials（'GE'）

通用电气是一家股票交易公司

我想知道，我如何下载一堆资产负债表（我有一个向量，比如说，2000个股票代码），然后将其导出到单独的文件中的任何SQL数据库

嗯，基本上我需要它在其他分析软件中使用，但找到全面的资产负债表数据库似乎是一项任务。我看到的唯一选择是通过quantmod进行

基本下载视图如下所示：

library(quantmod)
getFinancials('GE')
viewFinancials(GE.f)

---

你可以这样做

require(quantmod)
setwd("C:/Users/your_path_here/downloads")
stocks <- c("AXP","BA","CAT","CSCO","CVX","DD","DIS","GE","GS","HD","IBM","INTC","JNJ","JPM","KO","MCD","MMM","MRK","MSFT","NKE","PFE","PG","T","TRV","UNH","UTX","V","VZ","WMT","XOM")

# equityList <- read.csv("EquityList.csv", header = FALSE, stringsAsFactors = FALSE)
# names(equityList) <- c ("Ticker")

for (i in 1 : length(stocks)) {   
        temp<-getFinancials(stocks[i],src="google",auto.assign=FALSE)
        write.csv(temp$IS$A,paste(stocks[i],"_Income_Statement(Annual).csv",sep=""))
        write.csv(temp$BS$A,paste(stocks[i],"_Balance_Sheet(Annual).csv",sep=""))
        write.csv(temp$CF$A,paste(stocks[i],"_Cash_Flow(Annual).csv",sep=""))
        write.csv(temp$IS$A,paste(stocks[i],"_Income_Statement(Quarterly).csv",sep=""))
        write.csv(temp$BS$A,paste(stocks[i],"_Balance_Sheet(Quaterly).csv",sep=""))
        write.csv(temp$CF$A,paste(stocks[i],"_Cash_Flow(Quaterly).csv",sep=""))
}

require（quantmod）
setwd（“C:/Users/your_path_here/downloads”）
股票，是的，如果我只是把所有的股票都放在一起，即使在互联网速度非常快的英特尔至强上，它也会被卡住。你的互联网连接速度可能比你下载的服务器的连接速度重要得多。如果你在太短的时间内提出太多的请求，服务器可能会限制其对你的响应。太好了，我将尝试恢复它在少量情况下的响应，但在较大的情况下返回了一个错误：
在thead[x]：thead[x+1]：NA/NaN-аааааааааааааа，quiet=TRUE，：下载尺寸9510！=检索尺寸200