我正在尝试使用R进行一些市场分析。是否有任何方法可以使用包以微小的间隔获得实时股票报价?我熟悉quantmod并使用了getSymbols()函数,但是,我能够挖掘的所有数据都是15分钟。谢谢。
答案 0 :(得分:10)
我的qmao
package对于BATS和谷歌都有getQuote
个“方法”,这两种方法都接近实时
Sys.time()
#[1] "2014-11-19 14:27:48.727988 CST"
getQuote("SPY", src="google")
# TradeTime Last Change PctChg Exchange GoogleID
#SPY 2014-11-19 15:27:00 205.17 -0.38 -0.18 NYSEARCA 700145
getQuote("SPY", src="bats", what="bbo")
# TradeTime BidSize BidPrice AskPrice AskSize Last LastSize row.names
#1 15:27:24 15000 205.16 205.17 300 205.17 300 SPY
getQuote.bats
有几个选项可供您打印数据:
getQuote("SPY", src="bats", what="ladder")
# SPDR S&P 500 ETF TR TR UNIT
# Time: 15:27:44
# Volume: 8779553
# Last: 300 @ 205.17
#
#+-------+--------+-------+
#| | 205.21 | 16700 |
#+-------+--------+-------+
#| | 205.2 | 21900 |
#+-------+--------+-------+
#| | 205.19 | 17300 |
#+-------+--------+-------+
#| | 205.18 | 5572 |
#+-------+--------+-------+
#| | 205.17 | 300 |
#+-------+--------+-------+
#| 15000 | 205.16 | |
#+-------+--------+-------+
#| 12100 | 205.15 | |
#+-------+--------+-------+
#| 11300 | 205.14 | |
#+-------+--------+-------+
#| 23900 | 205.13 | |
#+-------+--------+-------+
#| 10600 | 205.12 | |
#+-------+--------+-------+
getQuote("SPY", src="bats", what="depth")
#
#
# BidQty BidPrice AskPrice AskQty
#-------- ---------- ---------- --------
# 15000 205.16 205.17 300
# 12100 205.15 205.18 5572
# 11300 205.14 205.19 17300
# 23900 205.13 205.2 21900
# 10600 205.12 205.21 16700
还有情节方法
plot(getQuote("SPY", src="bats"))
plot(getQuote("SPY", src="bats", what="ladder"))
plot(getQuote("SPY", src="bats", what="depth"))
而且,如果你还在阅读,那么套餐中包含一个闪亮的应用程序,这样你就可以实时更新这些“情节”。跑吧:
shinyBATS()
答案 1 :(得分:3)
有一个R包:http://cran.r-project.org/web/packages/IBrokers/index.html
有一个关于获取实时数据的小插曲,但它最后一次更新是在2009年,所以我会选择一般的小插图:http://cran.r-project.org/web/packages/IBrokers/vignettes/IBrokers.pdf,这是2014年的最新更新。
(*:不严格为真:对于某些交易所,您需要支付额外的交换费。)