r - 有没有办法加速格式化表格从 R 到 excel 的写入？

Question

我有一个 174603 行和 178 列的数据框，我使用 openxlsx::saveWorkbook 将其导入 Excel，(使用此包获取上述单元格格式，包括颜色、标题样式等)。但是这个过程非常慢，(取决于机器使用的内存量，它可能需要 7 到 17 分钟!!)我需要一种方法来显着减少这种情况(不需要几秒钟，但是下面的任何东西5分钟就可以了)

我已经搜索过其他问题，但它们似乎都专注于导出到 R(我对此没有问题)或将非格式化文件写入 R(使用 write.csv 和其他类似选项)

显然我无法使用 xlsx 包，因为我的计算机上的设置(工业计算机，查看 This question 上的评论)

任何有关此包中的包或其他功能的建议，以使其运行更快，我们将不胜感激。

Answer 1

这个问题有一段时间，但我和你有同样的问题，并想出了一个值得一提的解决方案。
有一个包叫 写xl 实现了一种使用 将数据框导出到 Excel 的方法。中号图书馆 libxlsxwriter .您可以使用以下代码导出到 excel:

library(writexl)
writexl::write_xlsx(df, "Excel.xlsx",format_headers = TRUE)

参数 格式标题 仅应用居中和粗体标题，但我在 github writexl library 中编辑了其源代码的 C 代码由ropensci 制作。
您可以下载或克隆它。内部 源 可以编辑的文件夹 write_xlsx.c 文件。
例如在他插入标题格式的部分

//how to format headers (bold + center)

lxw_format * title = workbook_add_format(workbook);

format_set_bold(title);

format_set_align(title, LXW_ALIGN_CENTER);

您可以添加此行以将背景颜色添加到标题

format_set_pattern (title, LXW_PATTERN_SOLID);

format_set_bg_color(title, 0x8DC4E4);

您可以在 中搜索很多格式。 libxlsxwriter 图书馆
当您完成编辑该文件并在名为 的文件夹中提供源代码时写xl ，您可以通过以下方式构建和安装编辑过的包

shell("R CMD build writexl")
install.packages("writexl_1.2.tar.gz", repos = NULL)

使用第一 block 代码再次导出将生成具有格式的 Excel，并且比我知道的任何其他库都快。
希望这可以帮助。