我的数据以标签式电子表格形式存在,我正在尝试编写一个脚本来导入它。
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)
}
这有效,在环境中提供了多个数据表:
我想要做的是将这些输出作为列表中的项目:
>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变量时显然是个错误。
请问这是怎么回事?
答案 0 :(得分:0)
之前在SO上找到了一些略有不同的搜索字词。为重复的帖子道歉。