问是否有导出当前绘图的命令？

EN

我正在创建一个一团糟的图表，并想导出为PDF格式的图表。当然，也可以在rstudio的绘图选项卡中单击“导出”，然后手动选择“将绘图另存为PDF"，当然，我不希望在pdf() / dev.off()中包装我的每一个部分。

理想情况下，我希望有一个函数可以将当前显示在RStudio中的绘图保存为我喜欢的参数(格式为/filename / width / height)。

有什么想法？

更新

根据@naught101的建议-- 5x7 (英寸！)pdf文件是一个方便粘贴到A4 Word文档的大小，下面的效果很好：

dev.copy2pdf(file="example.pdf", width = 7, height = 5)

更好的是，作为一个具有默认维度的易于调用的函数：

dopdf <- function(filename = "dopdf.pdf", pdf.width = 7, pdf.height = 5) {
 dev.copy2pdf(file=filename, width = pdf.width, height = pdf.height)
}

虽然使用ggplot2可以让我使用ggsave函数进行节省，但dev.copy2pdf是一个很好的通用解决方案(回答了我最初的问题)。