Я могу создать список ежедневных доходов для 4 ценных бумаг в среде. Но я не знаю, как рассчитать коэффициент скользящей информации для (Ra-Rb): SPY-EFA, SPY-GLD, SPY-TLO, EFA-SPY, EFA-GLD, ... TLO-GLD с n = 20 дней с использованием цен закрытия. На выходе должна быть матрица XTS или фрейм данных с каждым IR в столбце и индексом даты (n - это размер выборки).
Есть мысли о том, с чего начать?
from_date= "2014-12-31"
to_date= Sys.Date()
pr.env<- new.env()
tickers<- c("SPY","EFA","GLD","TLO")
total_tickers<- length(tickers)
getSymbols(tickers, from = from_date, to= to_date , env = pr.env, src = 'yahoo')
Returns<- eapply(pr.env, function(s) dailyReturn(s))