r - 使用 Purrr 导出列表

Question

我有一个包含子表的列表。我希望能够使用purrr列表中的项目名称单独导出表格 - 在下面的情况下，我将获得三个文件，每个植物都以今天的日期命名

library('purrr')
library('tidyverse')

mytest <- iris
mylist <- split(mytest,f = mytest$Species)
names(mylist)

# basically pseudo code for explanation purposes
write_excel_csv(mylist[1], names(mylist[1]))

我现在只是在学习如何有效地使用它，所以任何关于解释的帮助以及你为什么这样做都会很棒

我知道我可以编写一个 for 循环来遍历列表，但我想以此作为学习经验来开始purrr

感谢您的时间

Answer 1

Map从基础 R 将适用于这样的事情：

Map(write.csv, mylist, sprintf("%s-%s.csv", names(mylist), Sys.Date()))
list.files(pattern = "*.csv")
# [1] "setosa-2017-02-13.csv"     "versicolor-2017-02-13.csv" "virginica-2017-02-13.csv"

或者，walk2（可能还有 中的其他几个函数purrr）可以以这种方式使用。