将多个.xlsx文件的特定列读入R_R_Dplyr

将多个.xlsx文件的特定列读入R

将多个.xlsx文件的特定列读入R,r,dplyr,R,Dplyr,我的项目文件中有多个.xlsx文件。我可以通过以下方式轻松阅读所有内容： library(readxl) file.list <- list.files(pattern='*.xlsx') df.list <- lapply(file.list, read_excel) 库（readxl） file.list如果您喜欢使用tidyverse方式，可以使用map\u-df/map\u-dfr： library(dplyr) library(purrr) library(readxl)

我的项目文件中有多个.xlsx文件。我可以通过以下方式轻松阅读所有内容：

library(readxl)
file.list <- list.files(pattern='*.xlsx')
df.list <- lapply(file.list, read_excel)

库（readxl）
file.list如果您喜欢使用tidyverse
方式，可以使用map\u-df
/map\u-dfr
：
library(dplyr)
library(purrr)
library(readxl)
map_df(file.list, ~read_excel(.x) %>% select(12:22), .id = "id")

如果希望id作为文件名而不是数字，则与尝试使用lappy
类似
dplyr::bind_rows(sapply(file.list, function(x) read_excel(x)[12:22], 
                 simplify = FALSE), .id = 'id')

所有人都向tidyverse致敬，谢谢！如何将id
作为文件名？我将编辑我的原始帖子。在这种情况下，你可以使用sapply
和simplify=FALSE。检查更新的答案。
dplyr::bind_rows(sapply(file.list, function(x) read_excel(x)[12:22], 
                 simplify = FALSE), .id = 'id')