r - openxlsxを使用して、複数のシートを持つ複数のxlsxファイルからデータフレームを作成します

Question

この投稿のフォローアップ: openxlsx を使用して複数の Excel シートをインポートする 、複数の xlsx ファイルから複数のシートを 1 つの R データ フレームにインポートしたいと思います。

現時点では、私のコードは次のようになります。

require(openxlsx)   
file.list <- list.files(recursive=T,pattern='*.xlsx')

for (i i 1:length(file.list)){                                           
   wb <- loadWorkbook(file.list[i])           #select a file & load workbook
   sheet <-sheets(wb)                #get sheet list

     for (j in 1:length(sheet)){ 
       tmp<-read.xlsx(file.list[i], sheet=j, cols= c(1:4,6,7,9:12,14,15,17:30),
                      startRow=5, skipEmptyRows = T, colNames=F)
        tmp$file = i
         if (i==1&j==1) dataset<-tmp else dataset<-rbind(dataset,tmp)     
          }
        }

ただし、rbind 関数は次のエラーを返します。

  Error in rbind(deparse.level, ...) : 
  numbers of columns of arguments do not match

私の間違いは read.xlsx コードのどこかにあると思いますが、どこが間違っているのかわかりません。

どんな助けや提案も大歓迎です!