For循环创建多个数据框

Question

我有几个数据框，分别是“ df.1”，“ df.2”，.....直到“ df.100”。

我想为它们每个创建一个新的数据框，例如：

df.1.new <- df.1  %>% filter (var.1>=100)  %>% group_by (var.2)  %>% slice (which.min(var.3))

如何将代码应用于从“ df.1”到“ df.100”的所有这些数据帧？

Answer 1

获取列表中的数据框，并将代码应用于每个列表元素。

library(dplyr)

purrr::map(mget(paste0('df.', 1:100)), function(data) {
  data  %>% filter(var.1>=100)  %>% group_by(var.2)  %>% slice(which.min(var.3))
}) -> result