将标签式电子表格导入R

时间:2016-06-06 21:13:40

标签: r readxl

我的数据以标签式电子表格形式存在,我正在尝试编写一个脚本来导入它。

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)
}

这有效,在环境中提供了多个数据表:

  • TAB1
  • TAB2 ...

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

>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变量时显然是个错误。

请问这是怎么回事?

1 个答案:

答案 0 :(得分:0)

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

How to read all worksheets in an Excel Workbook into an R list with data.frame elements using XLConnect?