r - 按名称保存地块列表()

假设我有一个已创建的绘图列表。

library(ggplot2)
plots <- list()
plots$a <- ggplot(cars, aes(speed, dist)) + geom_point()
plots$b <- ggplot(cars, aes(speed)) + geom_histogram()
plots$c <- ggplot(cars, aes(dist)) + geom_histogram()

现在，我要保存所有这些内容，并分别用各自的name(plots)元素进行标记。

lapply(plots,
       function(x) {
         ggsave(filename=paste(...,".jpeg",sep=""), plot=x)
         dev.off()
         }
       )

我将用什么替换“...”，以便在工作目录中将图另存为:

a.jpeg
b.jpeg
c.jpeg

最佳答案

可能您需要传递列表的名称:

lapply(names(plots),
  function(x)ggsave(filename=paste(x,".jpeg",sep=""), plot=plots[[x]]))

关于r - 按名称保存地块列表()，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/6701810/