Ось X корреляции скольжения / окна

Я пытаюсь выполнить скользящую корреляцию с окном = 11 лет. Вот мой код:

library(gtools)
var1<-rnorm(52,0.010,0.05)
var2<-rnorm(52,0.015,0.01)
dat<-merge(var1,var2)
dat$year<-seq(1961,2012,1)

rc<-running(dat$x,dat$y,fun=cor, width=11)

Я хочу изобразить результат в виде простого линейного графика, например:

plot(rc,type="l")

Моя проблема - ось абсцисс. Как сопоставить значение корреляции с годами? Что-то вроде добавления значения заполнителя "0"?

Любые предложения о том, как я могу сделать это правильно в R.

Буду признателен за любую помощь. Спасибо заранее.


person Lyndz    schedule 21.07.2017    source источник