Wie speichere ich einen Plot als Image auf der Festplatte?

Ich zeichne eine einfache lineare Regression mit R. Ich möchte dieses Bild als PNG oder JPEG speichern. Ist es möglich, dies automatisch zu tun? (per Code)

Es gibt zwei verschiedene Fragen: Erstens schaue ich bereits auf das Diagramm auf meinem Monitor und möchte es so speichern, wie es ist. Zweitens habe ich den Plot noch nicht generiert, möchte ihn aber direkt auf der Festplatte speichern, wenn ich meinen Plotcode ausführe.

Es gibt zwei eng miteinander verbundene Fragen und jeweils eine Antwort.

1. In meinem Skript wird zukünftig ein Bild generiert. Wie speichere ich es auf der Festplatte?

Um ein Diagramm zu speichern, müssen Sie Folgendes tun:

1. Öffnen Sie ein Gerät, mit png(), bmp(),pdf() oder ähnlich
2. Zeichnen Sie Ihr Modell
3. Schließen Sie das Gerät mit dev.off()

Ein Beispielcode zum Speichern des Plots in einer pngDatei:

fit <- lm(some ~ model)

png(filename="your/file/location/name.png")
plot(fit)
dev.off()

Dies wird in der (kombiniert) Hilfeseite für die grafischen Formate beschrieben ?png, ?bmp, ?jpegund ?tiffsowie in der separaten Hilfeseite ?pdf.

Beachten Sie jedoch, dass das Bild auf der Festplatte möglicherweise anders aussieht als das gleiche Diagramm, das direkt auf Ihrem Bildschirm dargestellt wird, z. B. wenn Sie die Größe des Bildschirmfensters geändert haben.

Beachten Sie, dass Sie Ihren Plot explizit drucken müssen , wenn Ihr Plot von einem erstellt wurde latticeoder ggplot2Sie ihn explizit drucken müssen. In dieser Antwort wird dies ausführlicher erläutert und es werden auch Links zu den häufig gestellten Fragen ( R) angezeigt : Der qplot von ggplot wird beim Sourcing nicht ausgeführt

2. Ich betrachte gerade ein Diagramm auf meinem Bildschirm und möchte es unverändert auf die Festplatte kopieren.

dev.print(pdf, 'filename.pdf')

Dies sollte das Bild perfekt kopieren und dabei die Größe des interaktiven Fensters berücksichtigen. Sie können, wie im ersten Teil dieser Antwort, durch pdfandere Dateitypen wie ersetzen png.

Wenn Sie das Diagramm weiterhin in R sehen möchten, können Sie Folgendes verwenden dev.copy:

X11 ()
plot (x,y)

dev.copy(jpeg,filename="plot.jpg");
dev.off ();

Wenn Sie in R eine Unordnung von zu vielen Plotfenstern erreichen graphics.off(), schließen Sie alle Plotfenster.

Wenn Sie ggplot2die bevorzugte Art des Speicherns verwenden, verwenden Sie ggsave. Zuerst müssen Sie zeichnen, nachdem Sie das von Ihnen aufgerufene Diagramm erstellt haben ggsave:

ggplot(...)
ggsave("plot.png")

Das Format des Bildes wird durch die Erweiterung bestimmt, die Sie für den Dateinamen auswählen. Zusätzliche Parameter können übergeben werden ggsave, vor allem width, heightund dpi.

So was

png('filename.png')
# make plot
dev.off()

oder dieses

# sometimes plots do better in vector graphics
svg('filename.svg')
# make plot
dev.off()

oder dieses

pdf('filename.pdf')
# make plot
dev.off()

Und wahrscheinlich auch andere. Sie sind alle zusammen auf den Hilfeseiten aufgeführt.

Bei der ersten Frage finde dev.printich das Beste, wenn ich interaktiv arbeite. Zuerst richten Sie Ihren Plot visuell ein und wenn Sie mit dem, was Sie sehen, zufrieden sind, können Sie R bitten, den aktuellen Plot auf der Festplatte zu speichern

dev.print(pdf, file="filename.pdf");

Sie können durch pdfandere Formate wie ersetzen png.

Dadurch wird das Bild genau so kopiert, wie Sie es auf dem Bildschirm sehen. Das Problem mitdev.copy ist, dass das Bild häufig unterschiedlich ist und sich nicht an die Fenstergröße und das Seitenverhältnis erinnert. Dadurch wird das Diagramm standardmäßig quadratisch.

Bei der zweiten Frage (wie andere bereits beantwortet haben) müssen Sie die Ausgabe auf die Festplatte leiten, bevor Sie Ihre Plotbefehle ausführen

pdf('filename.pdf')
plot( yourdata )
points (some_more_data)
dev.off() # to complete the writing process and return output to your monitor

Wenn Sie R Studio http://rstudio.org/ verwenden, gibt es ein spezielles Menü, in dem Sie Ihren Plot in einem beliebigen Format und in einer beliebigen Auflösung speichern können

Wenn Sie ein Gerät mit öffnen png(), bmp(), pdf()usw. , wie vorgeschlagen Andrie (die beste Antwort), werden die Fenster mit Plots nicht Pop - up öffnen, nur * .png, * .bmp oder * .pdf - Dateien werden erstellt. Dies ist bei umfangreichen Berechnungen praktisch, da R nur eine begrenzte Anzahl von Grafikfenstern verarbeiten kann.

Wenn Sie jedoch die Diagramme anzeigen und auch speichern möchten, rufen Sie an, savePlot(filename, type)nachdem die Diagramme gezeichnet wurden und das Fenster mit ihnen aktiv ist.

plotpath<- file.path(path, "PLOT_name",paste("plot_",file,".png",sep=""))

png(filename=plotpath)

plot(x,y, main= file)

dev.off()

Um diese Antworten zu ergänzen: Wenn Sie ein R-Skript haben, das Aufrufe enthält, die Diagramme für den Bildschirm generieren (das native Gerät), können diese alle in einer PDF-Datei (dem Standardgerät für eine nicht interaktive Shell) gespeichert werden. "Rplots.pdf "(der Standardname) durch Umleiten des Skripts vom Terminal nach R (vorausgesetzt, Sie verwenden Linux oder OS X), z.

R < myscript.R --no-save

Dies könnte nach Bedarf in jpg / png konvertiert werden

In einigen Fällen möchte man ein Basis-Plot sowohl speichern als auch drucken. Ich habe ein bisschen Zeit verbracht und mir diese Dienstprogrammfunktion ausgedacht:

x = 1:10

basesave = function(expr, filename, print=T) {
  #extension
  exten = stringr::str_match(filename, "\\.(\\w+)$")[, 2]

  switch(exten,
         png = {
           png(filename)
           eval(expr, envir = parent.frame())
           dev.off()
         },
         {stop("filetype not recognized")})


  #print?
  if (print) eval(expr, envir = parent.frame())

  invisible(NULL)
}

#plots, but doesn't save
plot(x)

#saves, but doesn't plot
png("test.png")
plot(x)
dev.off()

#both
basesave(quote(plot(x)), "test.png")

#works with pipe too
quote(plot(x)) %>% basesave("test.png")

Beachten Sie, dass man verwenden muss quote, sonst wird der plot(x)Aufruf in der globalen Umgebung ausgeführt und an NULLweitergeleitet basesave().

dev.copy(png,'path/pngFile.png')
plot(YData ~ XData, data = mydata)
dev.off()