r - 将多个工作表导入到 R 中的多个数据框中

Question

我有一个包含很多工作表的 Excel 文件，我需要一个代码来将每个工作表导入到单独的数据框中，该数据框的命名方式与 Excel 中的工作表名称相同。

例如，选项卡 A、B、C 将分别作为数据框 A、B 和 C 导入。

从其他线程中，我看到如下代码:length(excel_sheets(filename)) 获取文件中的工作表数量

然后创建一个包含每个选项卡的列表:

read_excel_allsheets <- function(filename) {
  sheets <- readxl::excel_sheets(filename)
  x <-    lapply(sheets, function(X) readxl::read_excel(filename, sheet = X))
  names(x) <- sheets
  x
}

但我不知道选项卡如何从那里导入到 R 中。

非常感谢您的帮助。提前致谢!

Answer 1

这是一种方法:

# write test data
tf <- writexl::write_xlsx(
  list("the mtcars" = mtcars, "iris data" = iris), 
  tempfile(fileext = ".xlsx")
)

# read excel sheets
sheets <- readxl::excel_sheets(tf)
lst <- lapply(sheets, function(sheet) 
  readxl::read_excel(tf, sheet = sheet)
)
names(lst) <- sheets

# shove them into global environment
list2env(lst, envir = .GlobalEnv)