How to page multiple plots in R in separate jpeg files?

问题

I'd like to plot multiple plots in separate bitmap files using the file name pattern (for example, for JPEG) file.%03d.jpg in R. I tried using something like:

somevar <- 1
jpg(paste(sep='',filename,'.%03d.jpg'))
while(somevar <= n)
{
  plot(data[somevar])
  dev.new()
  somevar <- somevar + 1
}
dev.off()

but it creates one .jpg file and several Rplotnnn.pdf files. How can I change the default device to jpg, and use the custom file name pattern?

回答1:

I think this should work

somevar <- 1
while(somevar <= n) {
  jpg(sprintf("%s%03.jpg", filename, somevar))
  plot(data[somevar])
  dev.off()
  somevar <- somevar + 1
}

Plotting goes from device opening (here jpeg(...)) to dev.off(). You control the filename (where I corrected your use of paste() to sprintf()) and the loop.

回答2:

What happens if you remove the dev.new() from your code? The jpg function/device should generate the multiple files following your pattern as long as you keep writing to the jpg device (the device.new call starts a new device each time, hence the pdf files).

来源：https://stackoverflow.com/questions/6201515/how-to-page-multiple-plots-in-r-in-separate-jpeg-files