如何在R编程中读取多个excel表？

Question

我有一个包含400张的excel文件.如何使用read.xls函数将此excel文件加载到R？请提供此示例代码.

Answer 1

我只是假设你想要它作为一个data.frame()并且所有工作表都包含相同的数据.

library(xlsReadWrite) 
sheets <- c("Sheet 1","Sheet 2", "Sheet 3")

df <- data.frame()

for (x in 1:400) 
df <- rbind(df, read.xls("filename.xls", sheet=sheets[x]))
}

如果每个工作表都是它自己唯一的data.frame(),您可能希望将它们放在一个列表中.否则,如果要将它们作为环境中的对象,则可以使用assign().

sheet_list <- list()
for(x in 1:400) {
sheet_list[[x]] <- read.xls("filename.xls", sheet=sheets[x])
} 

或者,没有for循环:

sheet_list <- lapply(sheets, function(x) read.xls("filename.xls",sheets=x))