将XLSX电子表格读取到R中时包括空列？

Question

我正在使用XLSX软件包读取.xlsx文件，而不包含任何条目的列没有被捕获（跳过）。

代码：

wb     <- loadWorkbook(".xlsx")
sheet1 <- getSheets(wb)[[2]]

rows <- getRows(newsheet)[2:3]
  headerdata <- getCells(rows[1]) %>% lapply(., getCellValue) %>% as.data.frame()
  rowdata <- getCells(rows[2])%>% lapply(., getCellValue) %>% as.data.frame()
   names(rowdata) <- headerdata [RECEIVES ERROR MESSAGE 'names' attribute [17] must be the same length as the vector [14]]

任何输入都将不胜感激。