如何在RStudio中筛选列表内数据框的指定列？

下面提供几种在R中实现需求的方法，都是针对同结构数据框列表的通用方案：

方法1：基础R的lapply()函数 #

这是基础R里最便捷的批量处理方式，无需额外加载包：

# 提取列表中每个数据框的第1、2、6列
L_filtered <- lapply(L, function(df) df[, c(1, 2, 6)])

lapply会自动遍历列表L中的每一个数据框，对每个数据框执行列提取操作，最终返回一个包含筛选后数据框的新列表。

方法2：tidyverse风格的purrr+dplyr实现 #

如果你习惯使用tidyverse工具链，可以用purrr的map配合dplyr的select函数，写法更灵活（支持按位置或列名筛选）：

library(purrr)
library(dplyr)

# 按位置索引筛选
L_filtered <- map(L, ~ select(.x, 1, 2, 6))

# 要是知道列名，也可以直接写列名（更直观），比如假设列名为rank、discipline、salary：
# L_filtered <- map(L, ~ select(.x, rank, discipline, salary))

方法3：for循环（适合理解底层逻辑） #

如果想清晰看到每一步的处理过程，用for循环也能实现：

# 先创建一个和原列表长度一致的空列表，用来存结果
L_filtered <- vector("list", length(L))

# 遍历每个数据框，逐个提取指定列
for(i in seq_along(L)){
  L_filtered[[i]] <- L[[i]][, c(1, 2, 6)]
}

内容的提问来源于stack exchange，提问作者An116