使用多个xts对象-R中的getSymbols

Question

如何使用来自Yahoo Finance的多个数据集(xts格式)？

tickers <- c('^GSPC','JSE.JO')

getSymbols(tickers, from = "2008-01-01", to = "2011-12-31")

我现在必须对每个数据集应用技术分析技术？我从两只股票开始，但最终希望将该计划扩展到100只股票。我正在寻找一个简单的" for“循环来应用于每个数据集。

谢谢！:)

Answer 1

对于批处理符号，除了quantmod之外，还可以使用BatchGetSymbols包，也可以使用tidyquant包。请参见下面的示例。

BatchGetSymbols将提取所有数据并创建一个包含条目的列表。1包含检索到的股票的概述，以及是否成功；1 data.frame包含所有数据。

tickers <- c('^GSPC','JSE.JO')

library(BatchGetSymbols)

ticker_list <- ticker_list <- BatchGetSymbols(tickers, first.date = "2008-01-01", last.date = "2011-12-31")

或者使用tidyquant包来以整洁的格式获取数据。如果存在无法检索的数据，这也将返回一条消息。

library(tidyquant)
ticker_tidy <- tq_get(tickers, from = "2008-01-01", to = "2011-12-31")

或者只使用quantmod，但之后所有内容都会显示在list中。

tickers_data <- lapply(tickers, getSymbols, from = "2008-01-01", to = "2011-12-31", auto.assign = FALSE)
names(tickers_data) <- tickers

只需选择您的偏好即可。