PROBLEM:
我有一个数据帧列表,应将其作为 csv 文件写入磁盘。
假设这是数据框列表:
dfs <- list(iris,
mtcars)
什么没有奏效:
我尝试像这样构建正确的文件名,但它不起作用:
dfs %>%
map(~paste0("data-raw/", ., ".csv"))
我希望这一位能够正确地将文件名作为字符串返回。反而,map
将每一列和每个值与paste0
call.
我也尝试过deparse(substitute(.))
技巧,但是.
中没有被正确识别map
call.
下一步是写入数据帧(元素dfs
) 作为 csv 文件。
问题:
我该如何使用purrr::map
(或类似的方法)写入每个数据帧(每个元素dfs
)作为 csv 文件保存到磁盘,使用write_csv
?
map()
and walk()
两者都有效,但是walk()
不打印任何内容,而map()
will.
隐形输出
list(iris = iris, mtcars = mtcars) %>%
names(.) %>%
walk(~ write_csv(dfs[[.]], paste0("data-raw/", ., ".csv")))
将输出打印到控制台
list(iris = iris, mtcars = mtcars) %>%
names(.) %>%
map(~ write_csv(dfs[[.]], paste0("data-raw/", ., ".csv")))
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)