如何在收市前使用 R 中的 quantmod 包下载开盘价?

How to download opening price before market close using quantmod package in R?

我想在开市时从雅虎财经下载股票报价,以获得当天的开盘价。我正在尝试使用 quantmod 包中的 getSymbols() 在 R 中执行此操作:

#Acquire today's data as a string
today.char <- Sys.Date() %>% as.character

#Download stock quote during market hours
currentQuote <- getSymbols('QQQ',
                           from = today.char,
                           src = "yahoo",
                           env = NULL)

但是,这会导致以下错误:

Error in download.file(paste(yahoo.URL, "s=", Symbols.name, "&a=", from.m,  : 
  cannot open URL 'http://ichart.finance.yahoo.com/table.csv?s=QQQ&a=5&b=20&c=2016&d=5&e=20&f=2016&g=d&q=q&y=0&z=QQQ&x=.csv'
In addition: Warning message:
In download.file(paste(yahoo.URL, "s=", Symbols.name, "&a=", from.m,  :
  cannot open URL 'http://ichart.finance.yahoo.com/table.csv?s=QQQ&a=5&b=20&c=2016&d=5&e=20&f=2016&g=d&q=q&y=0&z=QQQ&x=.csv': HTTP status was '404 Not Found'

我做错了什么,我怎样才能至少在收市前获得一个开盘价?

getQuote() 适合你吗?例如 getQuote('X')[5] 会给出美国钢铁公司今天的开盘价,其余报价在 `getQuote()'

返回的数据框中