r - 如何将 R 中的绘图保存在工作目录的子目录中

Question

是否可以将 R 中的绘图保存到当前工作目录的子目录中？我尝试了以下方法，但这不起作用。我不确定如何将工作目录连接到我想要的文件名。

  wd <- getwd()

  png(filename=wd+"/img/name.png")

  counts <- table(dnom$Variant, dnom$Time)
  barplot(counts, main="Distribution of Variant and words of time",
    xlab="Temporal nouns", col=c("paleturquoise3", "palegreen3"),
    legend = rownames(counts))

另外，图像导出功能的默认保存目录是什么？

当运行下面大卫的建议时，返回的错误是:

Error in png(filename = paste0(wd, "/img/name.png")) : 
  unable to start png() device
In addition: Warning messages:
1: In png(filename = paste0(wd, "/img/name.png")) :
  unable to open file 'D:/Dropbox/Corpuslinguïstiek project/antconc resultaten/img/name.png' for writing
2: In png(filename = paste0(wd, "/img/name.png")) : opening device failed

Answer 1

试试这个:

File <- "./img/name.png"
if (file.exists(File)) stop(File, " already exists")
dir.create(dirname(File), showWarnings = FALSE)

png(File)

# ... whatever ...

dev.off()

如果可以覆盖文件，请省略 if 语句。

如果img存在，则可以选择省略dir.create。 (如果您尝试创建一个已经存在的目录，则不会导致问题。)

注释

1) 另一种可能是将 img 放在主目录中。我们可以使用 png("~/img/name.png") 将文件保存到主目录中的 img 目录中。如果不确定哪个目录是主目录，请尝试 path.expand("~")。

2) 另请注意在绘图命令之后(而不是之前)给出的 savePlot 命令。