Добавить график скользящего среднего к графику временного ряда в R

У меня есть график временных рядов в пакете ggplot2, и я выполнил скользящее среднее, и я хотел бы добавить результат скользящего среднего к графику временных рядов.

Образец набора данных (стр. 31):

Ambtemp DT
-1.14 2007-09-29 00:01:57
-1.12 2007-09-29 00:03:57
-1.33 29.09.2007 00:05:57
-1.44 29.09.2007 00:07:57
-1.54 29.09.2007 00:09:57
-1.29 2007-09-29 00:11:57

Применяемый код для представления временных рядов:

  Require(ggplot2)
  library(scales)
  p29$dt=strptime(p31$dt, "%Y-%m-%d %H:%M:%S")
  ggplot(p29, aes(dt, ambtemp)) + geom_line() +
     scale_x_datetime(breaks = date_breaks("2 hour"),labels=date_format("%H:%M")) + xlab("Time 00.00 ~ 24:00 (2007-09-29)") + ylab("Tempreture")+
     opts(title = ("Node 29"))

Пример представления временного ряда

Пример скользящего среднего сюжета Образец ожидаемых результатов

Проблема заключается в том, что данные временного ряда ov = получены из набора данных, который включает временные метки и температуру, но данные скользящего среднего включают только средний столбец, а не временные метки, и их согласование может привести к несогласованности.

Ответы на вопрос(1)

Ваш ответ на вопрос