Mam wykres szeregów czasowych w pakiecie ggplot2 i wykonałem średnią ruchomą i chciałbym dodać wynik średniej ruchomej do wykresu szeregów czasowych.

Przykład zestawu danych (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

Zastosowany kod do prezentacji szeregów czasowych:

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

Przykład prezentacji serii czasowych

Przykładowy wykres średniej ruchomej Przykład oczekiwanych wyników

Wyzwaniem jest to, że dane szeregów czasowych ov = pochodzą z zestawu danych, który zawiera znaczniki czasu i temperaturę, ale Przenoszenie średnich danych obejmuje tylko średnią kolumnę, a nie znaczniki czasu i dopasowanie tych dwóch może spowodować niespójność.