Outputing a
huxtable
(huxtable
version 5.4.0
) to a docx
似乎忽略了通过huxtable::set_font()
设置的字体。在我的系统上,我得到了字体“DejaVu Sans”的输出。
library(magrittr)
library(huxtable)
ht <- huxtable(column1 = 1:5,
column2 = letters[1:5]) %>%
set_font("arial")
quick_docx(ht, file = "hux.docx", open = FALSE)
事实证明,通过
huxtable::as_flextable()
将 huxtable 转换为 flextable,然后通过 flextable::font()
设置字体有效(flextable
版本 0.6.6
)。
ht_flex <- ht %>%
as_flextable() %>%
flextable::font(fontname = "arial")
flextable::save_as_docx(ht_flex, path = "hux_flex.docx")
但是,如果我能完全用
huxtable
完成工作,我会更喜欢。我是否遗漏了什么或者这是我的系统设置所特有的?