从多个 excel 文件中的特定单元格中提取数据 - R

Question

我需要从多个 excel 文件的两个单元格 (E6:E7) 中提取数据（日期、时间），然后将该数据存储到数据框中（日期和时间具有单独的列）。

查看下面我试过的代码。

setwd("C:/Users/tsamuels/Desktop/PDRA - Collins/growth_rate_folder")
file.list <- list.files(path=".", pattern="\d.xlsx$")
df.list <- lapply(file.list, read_excel(path=".", sheet = 1, range = "E6:E7", col_names = FALSE,
                                        col_types = NULL))

感谢任何帮助！

Answer 1

我没有使用 read_excel 而且你没有提供 MRE 所以我无法测试它，但你可以试试这个。

df.list <- lapply(file.list, read_excel, sheet=1, range="E6:E7", col_names=FALSE, col_types = NULL))

Answer 2

对您的文件和您希望的输出方式做出一些假设：

files <- list.files('.', pattern = '*.xlsx', recursive = TRUE)
df1 <- lapply(files, 
              function(x) {readxl::read_xlsx(x, sheet = 1, range = "E6:E7", col_names = FALSE)}) %>% 
  bind_cols %>% 
  t %>% 
  data.frame

colnames(df1) <- c('date', 'time')
rownames(df1) <- files

这里 bind_cols（或者您需要 bind_rows？）将获取您的数据帧列表并将它们组合起来

从多个 excel 文件中的特定单元格中提取数据 - R

Extract data from specific cells in multiple excel files - R

excel

r

lapply

readxl