首页 > 解决方案 > 将所有图像保存在 R 中

问题描述

我正在使用 ggplot2 包创建一堆图表。我为每个图表设置了一个标题,现在我想将它们全部保存在我设置的标题下。有没有一种简单的方法可以将它们保存在我的计算机上,而不必为ggsave("title_of_my_graph.png", plot=my_graph , height=, width=)我的脚本中的每个图形编写命令?

提前致谢 !

标签: rggplot2

解决方案


您可以编写一个ggsave()按标题保存的包装器。下面的例子:

ggsave_by_title <- function(plot, ...) {
  fname <- plot$labels$title
  if (is.null(fname)) {
    stop("No title detected")
  }
  fname <- paste0(fname, ".png")
  ggsave(fname, plot = plot, device = "png", ...)
}
p <- ggplot(iris, aes(Sepal.Width, Sepal.Length)) +
  geom_point(aes(colour = Species)) +
  ggtitle("Iris")

ggsave_by_title(p, width = 10, height = 5)

推荐阅读