R 批量读取excel工作簿里的工作表sheet

#方法就是与 list 结合；list 可以存很多东西

如下图所示：现在的目标——要循环读取这个excel里面的名为“0”-“10”的sheet，

 

 所以sheetindex 是从 2-12

library(xlsx)

list1 <- list()#需要先创建一个list

for (i in 2:12) {
  list1[i-1] <- list(read.xlsx("D:/R/singcell/likw/DATA/2021 feiyang wang/dNKmarker R.xlsx",sheetIndex = i,header = TRUE))
}

上面这行代码就能将所有工作簿的内容依次存到 list1 里面了

为了方便查看，将每一个存到list里的sheet的名称与原来的“0-10”对应起来。

（注：这里的cluster“只是根据个人需要添加的，这里是单细胞的cluster）

names(list1) #查看此时list里每一个数据集的名称
names(list1) <- paste("cluster",0:10) #重命名
names(list1) #再次查看此时list里每一个数据集的名称
list1 #查看整个list1的情况

得到结果如下：

> names(list1)
 [1] "cluster 0"  "cluster 1"  "cluster 2"  "cluster 3"  "cluster 4"  "cluster 5"  "cluster 6"  "cluster 7"  "cluster 8"  "cluster 9"  "cluster 10"