將 plot 保存為 png 圖像

Question

我有一個 plot，我將它保存在名為 p 的 object 中。

我需要將此 plot p保存為png圖像，我喜歡將其命名為"PICP.png" ，位於以下目錄中： "D:/data/results/images" 。 有人說我可以使用以下代碼：

png(paste0(output_dir, "PICP_", mla, "_", var, cm, ".png", sep=""), width=6, 
    height=5, units="in", res=1200)

plot(p)

dev.off()

問題是我不知道如何使用這些代碼。 我應該如何將這些代碼中的對象替換為我的 output 方向、object 名稱p和文件名： "PICP.png" ？

Answer 1

通過paste0 ing output_dir和其他變量指定 output 路徑和文件名。 您可能需要在output_dir的末尾添加一個"/" 。 請注意，在paste0中沒有sep=參數， sep=''實際上是默認值。 如果p已經是 plot （我從你的圖片中假設）不要使用plot(p)而是print(p) ，或者只是p 。

只需分兩步進行培訓。

## 1. make string
output_dir <- "D:/data/results/images/"  ## note the extra slash at the end

mla <- 'foo'
var <- 'bar'
cm <- 'baz'

(to <- paste0(output_dir, "/PICP_", mla, "_", var, cm, ".png", sep=""))
# [1] "D:/data/results/images/PICP_foo_barbaz.png"  ## specified path

## 2. put string in `png` as filenmame
png(to, width=6, height=5, units="in", res=1200)

print(p)  ## or just `p`

dev.off()

注意：如果您只想"PICP.png"作為文件名，

to <- paste0(output_dir, "PICP.png")

足夠了。

---

數據：

library(ggplot2)
p <- ggplot(mtcars, aes(wt, mpg)) +
  geom_point()