首页 > 解决方案 > 提取股票信息

问题描述

早上好。我正在尝试提取几家公司的股票数据。我使用下面的代码为一家名为 Godrej 的公司做事。

library(quantmod)
require(quantmod)
df1 <- as.data.frame(getSymbols("GODREJIND.NS", src = "yahoo", from = "2018-01-01", to = Sys.Date(),verbose = F, auto.assign = T))
allstocks <- fortify.zoo(GODREJIND.NS)

在此处输入图像描述

但是,如果我想一次提取超过 1 家公司。有没有办法做到这一点?我的计划是,我将所有公司都放在一个像上面这样的 excel 文件中,然后调用它

谁能帮我一次提取所有公司的股票

标签: r

解决方案


您可以尝试使用tidyquant它并将符号向量传递给tq_get函数。

symbols <- c("GODREJIND.NS", "ASHOKLEY.NS")
sd <- as.Date("2019-10-25")
ed <- as.Date("2019-10-31")


tq_get(symbols, 
       from = sd, 
       to = ed )

推荐阅读