Постройте сглаженную линию Лоусса во временном ряду зоопарка

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

Я уверен, что это связано с несоответствием индекса, но я не могу понять, как это обойти...

x.Date <- as.Date(paste(2003, 02, c(1, 3, 7, 9, 14,19,24,29), sep = "-"))
x <- zoo(rnorm(8), x.Date)
lo = lowess(x)
plot(x, type='p')
lines(lo,col='purple')

Новичок во временных рядах и любые советы приветствуются.


r time-series zoo smoothing
person Dirk Calloway    schedule 17.06.2013    source источник

Ответы (1)


arrow_upward
4
arrow_downward

Это должно работать:

lines(index(x), lo$y,col='purple')

index просто берет временной индекс из объекта зоопарка, и я не хотел использовать только значение y из нижнего.

person rbatt    schedule 17.06.2013
comment
Сработало как шарм... Спасибо! - person Dirk Calloway; 18.06.2013