将 dplyr::filter 应用于数据帧列表

Question

我需要使用dplyr::filter 过滤数据框列表。这应该很容易，但不知何故它不起作用。数据框列表是dflist，过滤器的基础是id变量的值，应该包含在include_vector中（过滤掉那些id不在include_vector中的行）。

lapply(dflist, function(x){dplyr::filter(x, id %!in% include_vector)})

函数排序工作（通过dflist 并且没有错误消息），但是如果我在过滤完成后查看data.frames，data.frames 完全相同。可能是什么问题？

Answer 1

使用purrr 和与Cettt 相同的测试数据（谢谢！）：

purrr::map(dflist, ~ dplyr::filter(., !(id %in% include_vector)))

Answer 2

我认为您对 lapply 所做的事情感到困惑。它不会改变原来的data.frames，而只是在列表中。

查看这个玩具示例：

df1 <- data.frame(id = letters[1:5])
df2 <- data.frame(id = letters[4:10])

dflist <- list(df1 = df1, df2 = df2)
include_vector <- c("d", "e", "f")

new_list <- lapply(dflist, function(x) dplyr::filter(x, ! id %in% include_vector))

现在new_list 看起来像这样：

$df1
  id
1  a
2  b
3  c

$df2
  id
1  g
2  h
3  i
4  j

但是df1 和df2 并没有改变。如果您也想更改df1 和df2，您可以这样做：

list2env(new_list, environment())

这将覆盖您当前工作环境中的df1 和df2。