r - 从 .xlsx 中读取 .xlsx，张数未知

Question

假设我有一个 excel 文件，我想使用 read.xlsx 函数将其读取到 R 中。文件由电子表格组成，我不知道电子表格的数量(大约有 200 个这样的文件，因此手动检查表格数量会很痛苦)。每个电子表格的组织方式就像一个适当的数据框架。我希望将这些电子表格一个一个地放在另一个之上。我写的是这样的:

    columnsILike <- c(1,40)
    for(i in 1:numberOfSheets){
        dfInd <- read.xlsx("myfile.xlsx", i, # number of sheet
                           colIndex=columnsILike, endRow=201, startRow=2, 
                           header=F)
        PreviousEmptyDataFrame <- rbind(PreviousEmptyDataFrame, dfInd)
    }
    write.csv(PreviousEmptyDataFrame, "data.csv")

问题是，我如何提前知道张数？

Answer 1

XLSX package 中的

getSheets(loadWorkbook("file_path"))应返回工作簿中的工作表列表，以便您可以获取列表的长度来查找工作表的数量。