r - 将选项卡式电子表格导入R中的列表

Question

我的数据以选项卡式电子表格的形式存在，我正在尝试编写一个脚本来导入它。

library(readxl)
oput <- 0

tabnames <- excel_sheets("dataset.xlsx")

for(x in seq_along(tabnames)){
    assign(tabnames[x], read_excel("dataset.xlsx", sheet = tabnames[x], col_names = TRUE)
}

这有效，在环境中为我提供了多个数据表：

• 选项卡1
• 选项卡2 ...

我想做的是将这些输出作为列表中的项目：

>oput
$tab1
[1] data1
$tab2
[1] data2
...

但我不能让它正常工作

assign(oput[[x]],  read_excel("dataset.xlsx", sheet = tabnames[x], col_names = TRUE)

和

assign(oput$x,  read_excel("dataset.xlsx", sheet = tabnames[x], col_names = TRUE)

两者都给出：

Error in assign(oput[[x]], read_excel("dataset.xlsx",  : 
invalid first argument

这显然是我在识别 sheetname 变量时的错误。

请问这样做的正确方法是什么？

Answer 1

之前在 SO 上找到了一些略有不同的搜索词。为重复的帖子道歉。

如何使用 XLConnect 将 Excel 工作簿中的所有工作表读入带有 data.frame 元素的 R 列表？