如何用for循环将.xlsx多工作表转为对应名称的R数据框

首先建议你先优化读取数据的代码，不用硬编码工作表索引1:3，而是自动获取所有工作表名称，这样后续不管工作表数量怎么变都不用改代码：

library(readxl)
# 获取文件中所有工作表的名称
sheet_names <- excel_sheets("students.xlsx")

# 创建列表，按工作表名称读取数据并命名列表元素
result <- list()
for (sheet in sheet_names) {
  result[[sheet]] <- read_excel("students.xlsx", sheet = sheet)
}

接下来有两种简单的方式把列表中的数据转换成以工作表名称命名的数据框：

方法1：用list2env()快速转换（推荐） #

这个函数可以直接把列表的元素批量导出到全局环境，每个元素的名称就是数据框的名字：

# 将列表元素转为全局环境中的数据框
list2env(result, envir = .GlobalEnv)

执行完这段代码后，你在R的全局环境里就能看到和工作表同名的数据框了。

方法2：用for循环+assign()手动创建（适合理解过程） #

如果想更清楚地看到每一步的创建过程，可以用assign()函数在循环里逐个生成数据框：

# 遍历列表的名称，逐个创建对应的数据框
for (name in names(result)) {
  # assign的第一个参数是要创建的变量名（字符串），第二个是要赋值的数据，第三个是环境
  assign(name, result[[name]], envir = .GlobalEnv)
}

注意事项 #

• 如果你的工作表名称包含空格、特殊字符或者以数字开头，生成的数据框名称需要用反引号（）包裹才能调用，比如工作表叫2023学生数据，调用时要写`2023学生数据``
• 尽量保持工作表名称是合法的R变量名（无空格、特殊字符，不以数字开头），这样调用数据框会更方便

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