Zapisywanie listy działek według ich nazw()

Question

Załóżmy, że mam listę fabuł, które utworzyłem.

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() 

Teraz chciałbym zapisać wszystkie te, oznaczając każdy z ich odpowiednimi nazwami (działki) elementem.

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

Co by wymienić „...” z takimi, które w moim katalogu roboczym zostały zapisane jako działki:

a.jpeg 
b.jpeg 
c.jpeg 

Answer 1

prawdopodobnie trzeba przekazać nazwy listy:

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