zum Beispiel ich diesen DatenrahmenVerwendung für Zeitreihen in R
Namen DATA habeDate A
22/02/2016 2
22/02/2016 6
23/02/2016 7
23/02/2016 9
24/02/2016 4
24/02/2016 8
Erste ich mache eine Zeitreihe von Tagen einen neuen Datenrahmen Jetzt erstellen
require(zoo)
B <- as.POSIXct(strptime(DATA$Date, "%d/%m/%Y"))
Time_series <- seq.POSIXt(from=B[1],to=B[6],by="day")
DATA_2 <- data.frame(Time_series)
Time_series
22/02/2016
23/02/2016
24/02/2016
ich will in jedem Zeitpunkt den Mittelwert der variablen beginnt A hier
A <- DATA$A
for (i in Time_series){
print(mean(A[which(B == i)]))
}
[1] 4
[1] 8
[1] 6
Mein Problem zu stellen, wenn ich einen Vektor des gedruckten Wertes machen will.
Die Idee ist, fügen Sie den Vektor zu Data_2
Sie könnten versuchen, tapply: 'tapply (DATA, DATA $ Datum, Mittelwert) ' – Dave2e