Comment enregistrer un tracé en tant qu'image sur le disque?

Je trace une régression linéaire simple à l'aide de R. Je voudrais enregistrer cette image au format PNG ou JPEG, est-il possible de le faire automatiquement? (via code)

Il y a deux questions différentes: Premièrement, je regarde déjà l'intrigue sur mon moniteur et je voudrais l'enregistrer tel quel. Deuxièmement, je n'ai pas encore généré le tracé, mais je voudrais l'enregistrer directement sur le disque lorsque j'exécute mon code de tracé.

Il y a deux questions étroitement liées et une réponse pour chacune.

1. Une image sera générée à l'avenir dans mon script, comment l'enregistrer sur le disque?

Pour enregistrer un tracé, vous devez procéder comme suit:

1. Ouvrez un dispositif, en utilisant png(), bmp(), pdf()ou similaire
2. Tracez votre modèle
3. Fermez l'appareil à l'aide de dev.off()

Un exemple de code pour enregistrer le tracé dans un pngfichier:

fit <- lm(some ~ model)

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

Ceci est décrit dans la page d'aide (combinée) pour les formats graphiques ?png, ?bmp, ?jpeget ?tiffainsi que dans la page d'aide séparée pour ?pdf.

Notez cependant que l'image peut différer sur le disque du même tracé directement tracé sur votre écran, par exemple si vous avez redimensionné la fenêtre à l'écran.

Notez que si votre tracé est créé par l'un latticeou l' autre, ggplot2vous devez imprimer explicitement le tracé. Voir cette réponse qui explique cela plus en détail et également des liens vers la FAQ R: qplot de ggplot ne s'exécute pas lors du sourcing

2. Je regarde actuellement un tracé sur mon écran et je veux le copier tel quel sur le disque.

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

Cela devrait parfaitement copier l'image, en respectant tout redimensionnement que vous avez fait à la fenêtre interactive. Vous pouvez, comme dans la première partie de cette réponse, remplacer pdfpar d'autres types de fichiers tels que png.

Si vous voulez continuer à voir l'intrigue dans R, une autre option est d'utiliser dev.copy:

X11 ()
plot (x,y)

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

Si vous atteignez un encombrement de trop de fenêtres de tracé dans R, utilisez graphics.off()pour fermer toutes les fenêtres de tracé.

Si vous utilisez ggplot2la méthode d'enregistrement préférée, utilisez ggsave. Vous devez d'abord tracer, après avoir créé le tracé que vous appelez ggsave:

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

Le format de l'image est déterminé par l'extension que vous choisissez pour le nom de fichier. Peuvent être transmis à d' autres paramètres ggsave, notamment width, heightet dpi.

Comme ça

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

ou ca

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

ou ca

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

Et probablement d'autres aussi. Ils sont tous répertoriés ensemble dans les pages d'aide.

Pour la première question, je trouve dev.printêtre le meilleur lorsque je travaille de manière interactive. Tout d'abord, vous configurez votre tracé visuellement et lorsque vous êtes satisfait de ce que vous voyez, vous pouvez demander à R d'enregistrer le tracé actuel sur le disque

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

Vous pouvez remplacer pdfpar d'autres formats tels que png.

Cela copiera l'image exactement comme vous la voyez à l'écran. Le problème dev.copyest que l'image est souvent différente et ne se souvient pas de la taille de la fenêtre et du rapport hauteur / largeur - elle force le tracé à être carré par défaut.

Pour la deuxième question, (comme d'autres l'ont déjà répondu), vous devez diriger la sortie sur le disque avant d'exécuter vos commandes de traçage

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

Si vous utilisez R Studio http://rstudio.org/ il y a un menu spécial pour enregistrer votre tracé sous n'importe quel format que vous aimez et à n'importe quelle résolution que vous choisissez

Si vous ouvrez un appareil à l' aide png(), bmp(), pdf()etc. comme suggéré par Andrie (la meilleure réponse), les fenêtres avec des parcelles ne seront pas pop - up ouvert, juste * .png, * .bmp ou * fichiers .pdf seront créés. C'est pratique dans les calculs massifs, car R ne peut gérer qu'un nombre limité de fenêtres graphiques.

Cependant, si vous souhaitez voir les tracés et les enregistrer, appelez une savePlot(filename, type)fois les tracés dessinés et la fenêtre les contenant active.

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

png(filename=plotpath)

plot(x,y, main= file)

dev.off()

Pour ajouter à ces réponses, si vous avez un script R contenant des appels qui génèrent des tracés à filtrer (le périphérique natif), ceux-ci peuvent tous être enregistrés dans un fichier pdf (le périphérique par défaut pour un shell non interactif) "Rplots.pdf "(le nom par défaut) en redirigeant le script vers R depuis le terminal (en supposant que vous utilisez linux ou OS X), par exemple:

R < myscript.R --no-save

Cela pourrait être converti en jpg / png si nécessaire

Dans certains cas, on veut à la fois enregistrer et imprimer un tracé de base r. J'ai passé un peu de temps et j'ai trouvé cette fonction utilitaire:

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

Notez que l'on doit utiliser quote, sinon l' plot(x)appel est exécuté dans l'environnement global et NULLest passé à basesave().

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