plot.xts als ps exportieren

Wie erstelle ich Grafiken, was ist zu beachten?

Moderatoren: EDi, jogo

Antworten
schubbiaschwilli
Beiträge: 253
Registriert: Di Jun 27, 2017 12:09 pm

plot.xts als ps exportieren

Beitrag von schubbiaschwilli »

Gude!

Ich habe leider ein Problem, wenn ich xts-Objekte plotte und als ps-Datei speichern möchte; es fehlt die Hälfte meiner Zeitreihe bzw. des gesamten Plots - Nehme ich die 'normale' Plot-Funktion, in dem ich mein Objekt umformatiere, zeigt er das an, was ich erwarten würde - Kennt jemand das Problem, und kann mir helfen (oder kann es zumindest jemand nachvollziehen, es kann ja auch sein, dass die Installation fehlerhaft ist oder sowas...)?

Dank&Gruß
schubbiaschwilli

Code: Alles auswählen

library(xts)

# Load data, filter and remove NAs
DAX <- getSymbols("^GDAXI",auto.assign = FALSE)
DAX <- DAX["2013/2017",4]
DAX <- DAX[!is.na(DAX)]

# Create xts-plot (DAX is a xts-class-object)
postscript("DAX.ps")
plot(DAX)
dev.off()

# Create 'normal' plot
postscript("DAX_2.ps")
plot(x=index(DAX), y=DAX, type="l")
dev.off()
jogo
Beiträge: 2085
Registriert: Fr Okt 07, 2016 8:25 am

Re: plot.xts als ps exportieren

Beitrag von jogo »

Hallo Willi,

willkommen im Forum!
Wenn ich Deinen Code laufen lasse erhalte ich Fehlermeldungen:

Code: Alles auswählen

> library(xts)
Lade nötiges Paket: zoo

Attache Paket: ‘zoo’

The following objects are masked from ‘package:base’:

    as.Date, as.Date.numeric

> 
> # Load data, filter and remove NAs
> DAX <- getSymbols("^GDAXI",auto.assign = FALSE)
Fehler in getSymbols("^GDAXI", auto.assign = FALSE) : 
  konnte Funktion "getSymbols" nicht finden
> DAX <- DAX["2013/2017",4]
Fehler: Objekt 'DAX' nicht gefunden
Ich kann somit die Grafiken nicht erzeugen und nicht sehen, worin der Unterschied zwischen beiden besteht.

Gruß, Jörg
schubbiaschwilli
Beiträge: 253
Registriert: Di Jun 27, 2017 12:09 pm

Re: plot.xts als ps exportieren

Beitrag von schubbiaschwilli »

Gude!

Hups, ja, das Minimalbeispiel war etwas zu minimalistisch, das Quantmod-Package fehlt.

Dank&Gruß Schubbiaschwilli

Code: Alles auswählen

library(xts)
library(quantmod)

# Load data, filter and remove NAs
DAX <- getSymbols("^GDAXI",auto.assign = FALSE)
DAX <- DAX["2013/2017",4]
DAX <- DAX[!is.na(DAX)]

# Create xts-plot (DAX is a xts-class-object)
postscript("DAX.ps")
plot(DAX)
dev.off()

# Create 'normal' plot
postscript("DAX_2.ps")
plot(x=index(DAX), y=DAX, type="l")
dev.off()
Antworten