Quantmod：yahoo EODの価格データから分割日を抽出する

Question

これはYahoo Financeから入手した在庫データに関連しています。

私は、株式が分割された（またはボーナス株式が発行された、現在のタスクとは区別されない）日付の決定方法を探しています。

この問題に対する具体的な回答が見つかりませんでした。私は、このソリューションはに実行するかもしれないものの問題知っていただきたいと思い

require(quantmod) 
AAPL<- getSymbols("AAPL", from="1987-01-01",to="2016-08-01", auto.assign = F) 
# head(AAPL) 
# tail(AAPL)  
# assuming a minimum split of 10:11 
probableSplits<- which(Delt(Cl(AAPL)/Ad(AAPL)) <= -0.1)  
probableSplitDates<- index(AAPL)[probableSplits] 
x<- AAPL[c(probableSplits, ((probableSplits)-1))] 
x$tmpratio<- Cl(x)/Ad(x)  
x$splitRatio<- round(1/(1+Delt(x$tmpratio))) 
#Added Following 1 line for very old stocks with adjusted price in low decimals 
probableSplitDates<- index(x[x$splitRatio>1,]) 

x$splitRatio[probableSplitDates] 

chartSeries(AAPL["2014-06"],theme = chartTheme('white')) 

：ここで私は考えることができる最高です。

私はここでAppleを使用していますが、私はインドの取引所（RELIANCE.NSなど）のデータを探していますので、米国のクロスリファレンスの特定のソースが私にとってうまくいきません。

EDITは：非常に低い小数点値

Answer 1

あなたはヤフー・ファイナンスが提供するスプリット/配当データを使用することができ、古い調整価格をコードする1行を追加しました。

require(quantmod) 
getSplits("RELIANCE.NS") 
#   RELIANCE.NS.spl 
# 1997-10-27    0.5 
# 2009-11-26    0.5 

---

また、あなたのための調整を行うためにadjustOHLCを使用することができます。