xlsx::write.xlsx()处理多行tibble且row.names=F时崩溃问题

这是xlsx::write.xlsx()针对tibble的兼容性bug——该包开发时间较早，对tibble的特性（比如保留非标准列名的机制）处理逻辑存在缺陷，当传入2行及以上的tibble且设置row.names = F时，内部条件判断代码无法正确处理向量型返回值，从而抛出Error in if (is.na(value)) { : the condition has length > 1错误。

可行的解决办法 #

• 替换为更兼容的包：使用openxlsx::write.xlsx()，该包维护更活跃，原生支持tibble，无需转换格式即可保留原列名，且row.names = FALSE参数可正常生效，示例代码：

  library(openxlsx)
  write.xlsx(your_tibble, "output_file.xlsx", rowNames = FALSE)
  

• 适配列名后转data.frame：若必须使用xlsx包，先手动调整tibble的列名使其符合data.frame的命名规则，再转换格式后写入，示例：

  library(xlsx)
  # 将非标准列名替换为下划线（可根据需求调整规则）
  colnames(your_tibble) <- gsub("[^a-zA-Z0-9_]", "_", colnames(your_tibble))
  # 转换为data.frame后写入
  write.xlsx(as.data.frame(your_tibble), "output_file.xlsx", row.names = FALSE)
  

• 临时规避方案：给tibble添加临时行名后使用row.names = TRUE写入，后续手动在Excel中删除行号列，但此方法较为繁琐，仅作应急使用。

内容的提问来源于stack exchange，提问作者asd-tm