r - 从 Excel 导入时如何忽略隐藏数据

Question

我有一组 Excel 文件，正在将其导入到 R 中。

这些文件包含我想忽略的隐藏数据 - 例如，干脆不导入它，或者使用指示它已隐藏的标志导入它，以便我可以删除它。

这些文件包含两种类型的隐藏数据:

• 完整工作表已隐藏
• 工作表中的特定行已隐藏。

有没有办法识别 Excel 中的数据何时被隐藏？

现在我正在使用 gdata 软件包，但很高兴使用 XLConnect 或其他软件包

示例代码:

library(gdata)
xlsfile <- "test.xls"

# grab all the sheet names. 
# This is giving me both hidden & non-hidden sheets.  I would like only the latter
sheets <- sheetNames(xlsfile)

# read in the xls file, by sheet 
xlData <- 
  lapply(sheets, function(s) 
      read.xls(xlsfile, sheet=s, stringsAsFactors = FALSE))

如果需要，我可以创建一个虚拟 xls 文件并将其发布。

Answer 1

XLConnect 有一个名为 isSheetHidden 的好函数，它可以完成您想要的操作。假设 Sheet2 被隐藏:

library(XLConnect)
xlsfile <- "Book1.xls"
wb <- loadWorkbook(xlsfile, create = TRUE)
isSheetHidden(wb, "Sheet1") # FALSE
isSheetHidden(wb, "Sheet2") # TRUE

在gdata中，您必须编写自己的函数来调用底层perl包来访问工作表属性，但这是可能的。