Вот несколько ссылок о расчетах OBV:
- http://ta.mql4.com/indicators/volumes/on_balance_volume
- http://stockcharts.com/school/doku.php?id=chart_school:technical_indicators:on_balance_volume_obv
- http://en.wikipedia.org/wiki/On-balance_volume
Когда я перехожу к исходному коду функции OBV в пакете TTR, я вижу:
"OBV" <-
function(price, volume) {
# On Balance Volume
price <- try.xts(price, error=as.matrix)
volume <- try.xts(volume, error=as.matrix)
if(!(is.xts(price) && is.xts(volume))) {
price <- as.vector(price)
volume <- as.vector(volume)
}
obv <- c( volume[1], ifelse( ROC(price) > 0, volume, -volume )[-1] )
obv <- cumsum( obv )
if(is.xts(obv)) {
obv <- xts(obv,index(price))
colnames(obv) <- 'obv'
}
reclass( obv, price )
}
Я вижу, что случай равенства (я имею в виду случай, когда сегодняшнее закрытие равно вчерашнему) на эталонных веб-страницах не существует в реализации функции OBV.
Это ошибка или принятие пакета? Если это ошибка, куда я могу сообщить о проблеме?
Спасибо,