2017-10-22 216 views
2

我目前正在學習R,我只是試圖在quantmod包中使用getSymbols來獲取一些價格數據。通過代碼和日期合併getSymbols數據

我有一個數據框,它有澳大利亞證券交易所上一個行業的年度業績發佈的代碼和日期。我想要做的是在發佈當天的調整價格以及5天之前和5天之後的價格合併。

Ticker Ann_Rep_Date Ad.Price +5d.Ad.Price -5d.Ad.Price 
AGI.AX 14/10/16 
ALL.AX 22/12/16 
CWN.AX 19/09/16 
TAH.AX 4/08/16 
TAH.AX 4/08/17 
TTS.AX 17/08/17 

請注意,由於存在多個年度結果發佈,因此單個股票代碼可能需要多個價格。

回答

1

我設法使用tidyquant的tqget來做到這一點。它可以將我所有的價格存儲在一個大的快樂數據框中,這樣可以很容易地與上述數據合併。

library(tidyquant) 

prices <- c('TBH.AX','CWN.AX','SGR.AX','AQS.AX','ALL.AX', 
     'TAH.AX','JIN.AX','TTS.AX','AGI.AX') %>% 
     tq_get(get = 'stock.prices') 

Ann_Reps <- merge(prices, Ann_Reps, by.x=c('symbol','date'), 
by.y=c('ticker','Ann_Rep_Date'))