читать несколько файлов xlsx с несколькими листами и связывать их в один фрейм данных - PullRequest
0 голосов
/ 24 июня 2019

Я бы хотел, чтобы R читал в нескольких файлах xlsx, которые имеют несколько листов, у меня есть заголовок (colnames) для первого листа каждого файла, но у меня его нет для остальных листов, однако это точно такие же столбцы. Некоторые листы имеют пустые столбцы, но это необходимо учитывать в значениях NA Я попробовал это, он читает файлы, но в последнем фрейме данных есть ошибки, в некоторых ячейках есть значения NA, которые не могут быть У кого-нибудь есть идея или альтернативное решение? Спасибо

library(readxl)    

#Set path
inputFolder <- "test/"

#Get list of files
fileList <- list.files(path = inputFolder, recursive=T, pattern='*.xlsx')

#Read in each sheet from each excel
for (f in 1:length(fileList)){
  #Find the number of sheets in this workbook
  sheetList <- excel_sheets(paste(inputFolder, fileList[f], sep = ""))
  #Get the sheets of this workbook
  for (s in 1:length(sheetList)) {
    tempSheet <- read_excel(paste(inputFolder, fileList[f], sep = ""), sheet = sheetList[s])
    if (f == 1 & s == 1) {
      df <- tempSheet
    }
    else {
      if(s != 1) {
        names(tempSheet) <- names(df)
      }
      df <- rbind(df,tempSheet)
    }
  }
}
...