Zeichnen von Daten gegen die Zeit, R

Habe ich einen Daten-frame mit einer Spalte Datum/Uhrzeit(intern als numerische) und andere Spalten als zahlen/integer und ich möchte Daten Plotten gegen Datum/Zeit.

Datum/die Uhrzeit in den Daten-frame, der aufgefüllt wurde mit den folgenden. 

as.POSIXct(strptime(time, '%H:%M:%S %p %m/%d/%Y',tz='GMT'))

class(table$time) ist numeric.

  1. Wie kann ich die Handlung und zeigen die Daten in der x-Achse als lesbare Datum-Uhrzeit in einem bestimmten format.
  2. Wie kann man mit graph Teilmenge von Zeilen und nicht alle Zeilen Ab: Zeilen zwischen dateTime1 und dateTime2 wo dateTime1 und dateTime2 sind Datum in einem bestimmten format.
  • Konnte es möglich sein, für Sie zu zeigen, was Ihre dataframe aussieht? Ich habe Mühe, zu verstehen, wie Ihr time können sowohl numerische als auch von der form '%H:%M:%S %p %m/%d/%Y' zur gleichen Zeit.
InformationsquelleAutor 2sb | 2012-04-13
  1. 10

    Könnten Sie auch ggplot2 insbesondere geom_point oder geom_line (beachten Sie, dass ich mithilfe der Beispiel-Daten aus @plannapus):

    require(ggplot2)
theme_set(theme_bw()) # Change the theme to my preference
ggplot(aes(x = time, y = variable), data = data) + geom_point()

    Zeichnen von Daten gegen die Zeit, R

    oder mit einem line-geometrie:

    ggplot(aes(x = time, y = variable), data = data) + geom_line()

    Zeichnen von Daten gegen die Zeit, R

    ggplot2 erkennt automatisch, dass der Datentyp der x-Achse ein Datum, und zieht die Achse entsprechend.

    • +1 in der Tat viel bequemer als meins. Da ist auch ein Weg, um das format der Etiketten oder deren Vermittlung, wenn nötig?
    • Ja, Sie können scale_x_date oder scale_x_datetime zu zwicken die Waage. Siehe die Dokumentation für einige Beispiele.
    InformationsquelleAutor Paul Hiemstra
  2. 7

    Hier einige dummy-Daten:

    data <- structure(list(time = structure(c(1338361200, 1338390000, 1338445800, 1338476400, 1338532200, 1338562800, 1338618600, 1338647400, 1338791400, 1338822000), class = c("POSIXct", "POSIXt"), tzone = ""), variable = c(168L, 193L, 193L, 201L, 206L, 200L, 218L, 205L, 211L, 230L)), .Names = c("time", "variable"), row.names = c(NA, -10L), class = "data.frame")
data
              time variable
1  2012-05-30 09:00:00      168
2  2012-05-30 17:00:00      193
3  2012-05-31 08:30:00      193
4  2012-05-31 17:00:00      201
5  2012-06-01 08:30:00      206
6  2012-06-01 17:00:00      200
7  2012-06-02 08:30:00      218
8  2012-06-02 16:30:00      205
9  2012-06-04 08:30:00      211
10 2012-06-04 17:00:00      230

    Zeigen Sie Datum und Uhrzeit in der Achse, die Sie verwenden können, Funktion axis.POSIXct:

    plot(data, xaxt="n")
axis.POSIXct(side=1, at=cut(data$time, "days"), format="%m/%d")

    Können Sie Steuern, wo die Zecken fallen mit at (wie für reguläre Funktionaxis außer hier ist es zur Verfügung gestellt werden, Objekte der Klasse POSIXct) und bestimmen, wie Sie angezeigt wird mit format.

    Soweit Untergruppen betrifft, so lange, wie Sie Ihre dateTime1 und dateTime2-Objekte sind auch POSIXct-Objekten Sie können es tun, wie Sie würde jede andere Art von Untergruppen.

    dateTime1 <- strptime("00:00 05/31/2012", format="%H:%M %m/%d/%Y")
dateTime2 <- strptime("3 Jun 2012 05-30", format="%d %b %Y %H-%M")
data[data$time < dateTime2 & data$time > dateTime1, ]
                 time variable
3 2012-05-31 08:30:00      193
4 2012-05-31 17:00:00      201
5 2012-06-01 08:30:00      206
6 2012-06-01 17:00:00      200
7 2012-06-02 08:30:00      218
8 2012-06-02 16:30:00      205
    InformationsquelleAutor plannapus
Schreibe einen Kommentar