Plotten Zeitreihen in R

So, ich denke, es gibt ein paar Dinge hier, die sind der Rede Wert durch:

zunächst einige Beispiel-Daten:

test <- data.frame(End = Sys.Date()+1:5, 
               Start = Sys.Date()+0:4, 
               tck = rep("GOOG",5), 
               EndP= 1:5, 
               StartP= 0:4)

test.sub = subset(test, tck=="GOOG",select = c(End, EndP))

Beachten Sie zunächst, dass test und test.sub Daten-frames, so fordert wie test.sub[1] nicht wirklich "bedeuten" etwas zu R.** Es ist mehr R-ish zu schreiben test.sub[,1] aufgrund der Konsistenz mit anderen R-Strukturen. Vergleicht man die Ergebnisse der str(test.sub[1]) und str(test.sub[,1]) du wirst sehen, dass R Sie behandelt etwas anders.

Du gesagt hast eingegeben:

as.ts(test.sub)
plot(test.sub)

Ich denke, Sie haben umfangreiche Erfahrung mit irgendeiner Art von OO-Sprache; und während R hat einige OO-Geschmack, um es, es gilt nicht hier. Anstatt die Umwandlung test.sub sowas von Klasse ts, dies nur tut, die transformation und wirft es Weg, dann bewegt sich auf der plot-Daten-frame mit dem Sie angefangen haben. Es ist leicht zu beheben, aber:

test.sub.ts <- as.ts(test.sub)
plot(test.sub.ts)

Aber, dies ist wahrscheinlich nicht, was Sie gesucht haben. Vielmehr R erzeugt eine Zeitreihe, die zwei Variablen mit der Bezeichnung "Ende" (das ist das Datum nun dazu gezwungen eine ganze Zahl) und "EndP". Komisches Geschäft, wie das ist Teil der Grund, warum time-series-Pakete wie zoo und xts gefangen haben, so werde ich ausführlich Ihnen stattdessen ein wenig weiter nach unten.

(Leider, zu meinem besten Verständnis, R nicht halten Datumsstempel mit seiner Standard-ts-Klasse, die Wahl stattdessen halten Sie start-und Enddatum sowie eine Frequenz. Weitere Allgemeine Zeit-Serie arbeiten, ist dies nur selten flexibel genug)

Könnten Sie vielleicht bekommen, was Sie wollte, durch Eingabe

plot(test.sub[,1], test.sub[,2]) 

statt

plot(test.sub[1], test.sub[2])

da ersteres läuft in Schwierigkeiten, da Sie auf der Durchreise sind zwei sub-Daten-frames anstelle von zwei Vektoren (auch wenn es so aussieht, wie Sie sein würde).*

Sowieso, mit xts (und ähnlich für zoo):

library(xts) # You may need to install this
xtemp <- xts(test.sub[,2], test.sub[,1]) # Create the xts object
plot(xtemp) 
# Dispatches a xts plot method which does all sorts of nice time series things

Hoffe, etwas davon hilft, und sorry für die inline-code nicht als solche identifiziert: noch immer verwendet, um stack-überlauf.

Michael

**In Wirklichkeit, haben Sie Zugriff auf die Listen, die verwendet werden, um die Struktur einer Daten-frame intern, aber das ist mehr ein code nuance als etwas, das lohnt sich auf.

***Die nitty-gritty ist, wenn Sie übergeben plot(test.sub[1], test.sub[2]) zu R ist, löst die Methode plot.data.frame nimmt einem einzelnen Daten-frame und versucht zu interpretieren, die zweite Daten-frame als zusätzliche plot-parameter, die bekommt fehlinterpretiert irgendwo hinunter die Linie, indem Sie Ihre Fehler.

InformationsquelleAutor mweylandt

Sicherlich ist es leichter die Formel zu verwenden-Schnittstelle:

> test <- data.frame(End = Sys.Date()+1:5, 
+                Start = Sys.Date()+0:4, 
+                tck = rep("GOOG",5), 
+                EndP= 1:5, 
+                StartP= 0:4)
> 
> test.sub = subset(test, tck=="GOOG",select = c(End, EndP))
> head(test.sub)
         End EndP
1 2011-10-19    1
2 2011-10-20    2
3 2011-10-21    3
4 2011-10-22    4
5 2011-10-23    5
> plot(EndP ~ End, data = test.sub, type = "l")

Ich arbeite viel mit Zeit-Serien Daten vom Typ und selten, wenn überhaupt, keine Notwendigkeit für die "ts" Klasse von Objekten. Pakete zoo und xts sind sehr nützlich, aber wenn alles, was Sie tun möchten, ist eine Darstellung der Daten, i) bekommen, die Datum/Uhrzeit Informationen korrekt formatiert/set-up als "Date" oder "POSIXt" class-Objekt, und dann ii) einfach zeichnen Sie es mit standard-Grafiken und type = "l" (oder type = "b" oder type = "o" wenn Sie sehen möchten der beobachtungsdauer).

InformationsquelleAutor Gavin Simpson