Eu tenho um lote de séries temporais no pacote ggplot2 e realizei a média móvel e gostaria de adicionar o resultado da média móvel ao gráfico da série temporal.

Amostra do conjunto de dados (p31):

ambtemp dt
-1,14 2007-09-29 00:01:57
-1.12 2007-09-29 00:03:57
-1,33 2007-09-29 00:05:57
-1,44 2007-09-29 00:07:57
-1.54 2007-09-29 00:09:57
-1.29 2007-09-29 00:11:57

Código aplicado para apresentação de séries temporais:

  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"))

Amostra de apresentação de séries temporais

Amostra de plotagem de média móvel Amostra de resultados esperados

O desafio é que os dados de séries temporais obtidos de conjuntos de dados que incluem registros de data e hora e temperatura, mas dados da Média móvel, incluem apenas a coluna média e não os registros de data e hora e a adaptação desses dois pode causar inconsistência.