R读取xlsx中的所有sheet，以sheet名命名变量

在 R 中，你可以使用 openxlsx 或 readxl 包来读取 Excel 文件中的所有工作表，并将每个工作表的内容保存到以工作表名称命名的变量中。以下是使用 readxl 包的示例代码：

# 安装并加载readxl包
install.packages("readxl")
library(readxl)

# 读取Excel文件的路径
file_path <- "your_file.xlsx"

# 获取所有工作表的名称
sheet_names <- excel_sheets(file_path)

# 使用lapply函数读取所有工作表，并将其命名为工作表名称
sheets <- lapply(sheet_names, function(sheet) {
  read_excel(file_path, sheet = sheet)
})

# 将工作表列表中的每个数据框分配给一个变量，变量名为工作表名
for(i in seq_along(sheet_names)) {
  assign(sheet_names[i], sheets[[i]])
}

上述代码将所有工作表读取并保存到相应的变量中，这些变量的名称与工作表名称一致。你可以根据需要更改 file_path 变量来指定 Excel 文件的路径。