Jak zapisać wykres jako obraz na dysku?

Jeśli chcesz nadal widzieć Wykres W R, inną opcją jest użycie dev.copy:

X11 ()
plot (x,y)

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

Jeśli osiągniesz bałagan zbyt wielu okien wykresu W R, użyj graphics.off(), aby zamknąć wszystkie okna wykresu.

Jeśli używasz ggplot2 preferowanym sposobem zapisu jest użycie ggsave. Najpierw musisz wykreślić, po utworzeniu wykresu wywołujesz ggsave:

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

Format obrazu zależy od rozszerzenia wybranego dla nazwy pliku. Dodatkowe parametry można przekazać ggsave, w szczególności width, height, i dpi.

Like this

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

Lub to

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

Lub to

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

I prawdopodobnie inni też. Wszystkie są wymienione razem na stronach pomocy.

Na pierwsze pytanie uważam, że dev.print jest najlepszy w pracy interaktywnej. Po pierwsze, skonfigurujesz Wykres wizualnie i kiedy będziesz zadowolony z tego, co widzisz, możesz poprosić R o zapisanie bieżącej wykresu na dysku

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

Możesz zastąpić pdf innymi formatami, takimi jak png.

To skopiuje obraz dokładnie tak, jak widzisz go na ekranie. Problem z dev.copy polega na tym, że obraz jest często inny i nie pamięta rozmiaru okna i proporcji obrazu-wymusza to na wykresie domyślnie kwadratowy.

Na drugie pytanie, (jak inni już odpowiedzieli), musisz skierować wyjście na dysk, zanim wykonasz swoje polecenia kreślarskie

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

Jeśli używasz R Studio http://rstudio.org/ istnieje specjalne menu, aby zapisać wykres w dowolnym formacie i w dowolnej rozdzielczości wybrać

Jeśli otworzysz urządzenie za pomocą png(), bmp(), pdf() itd. zgodnie z sugestią Andrie (najlepsza odpowiedź), okna z działkami nie wyskakują, tylko *.png, * bmp lub *.pliki pdf zostaną utworzone. Jest to wygodne w dużych obliczeniach, ponieważ R może obsługiwać tylko ograniczoną liczbę okien graficznych.

Jednakże, jeśli chcesz zobaczyć wykresy i mieć je zapisane, wywołaj savePlot(filename, type) po narysowaniu Wykresów, a okno zawierające je jest aktywne.

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

png(filename=plotpath)

plot(x,y, main= file)

dev.off()

Aby dodać do tych odpowiedzi, jeśli masz skrypt r zawierający wywołania, które generują wykresy na ekranie( urządzenie natywne), to wszystkie one mogą być zapisane w pliku pdf (domyślne urządzenie dla nieinteraktywnej powłoki) "Rplots.pdf " (domyślna nazwa) poprzez przekierowanie skryptu do R z terminala (zakładając, że używasz Linuksa lub OS X), np.:

R < myscript.R --no-save

To może być przekonwertowane do jpg/png w razie potrzeby

W niektórych przypadkach chce się zarówno zapisać, jak i wydrukować wykres r bazy. Spędziłem trochę czasu i wymyśliłem tę funkcję użyteczności:

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")

Należy pamiętać, że należy użyć quote, w przeciwnym razie wywołanie plot(x) jest uruchamiane w środowisku globalnym i NULL jest przekazywane do basesave().

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