R的Huxtable包:如何为huxtables的caption()和footnote()设置font_size()?

时间:2018-10-17 14:49:42

标签: r

使用set_font_size()命令可以轻松地为huxtable中的单元格调整字体大小。但是,此MWE中的标题和脚注的字体大小未作相应调整:

HUX_table <- matrix("x", 6, 2)
HUX_table <- as_hux(HUX_table)        %>%
  huxtable::add_colnames()            %>%
  set_all_borders(1)                  %>%
  set_rowspan(c(2, 5), 1, 3)          %>%
  set_font_size(4)                    %>%
  set_caption("Sample Caption")       %>% 
  add_footnote("Sample Footnote")

我尝试了set_caption_size()和set_caption_font_size(),但收效甚微。任何帮助深表感谢!

1 个答案:

答案 0 :(得分:1)

这些命令不起作用并不奇怪,因为它们不存在。您必须在caption中添加原始命令,例如对于HTML:

caption(hux) <- "<span style='font-size: 8pt'>My caption</span>"

与TeX类似。

脚注问题微妙。很自然地假设set_font_size(HUX_table, 4)将不仅为当前行而且为单元格行设置字体大小。自然的,也许那是应该发生的,但事实并非如此。因此,将font_size命令放在链的末尾,它将影响脚注。

HUX_table <- as_hux(HUX_table)        %>%
      huxtable::add_colnames()            %>%
      set_all_borders(1)                  %>%
      set_rowspan(c(2, 5), 1, 3)          %>%
      set_caption("<span style='font-size: 8pt'>Sample Caption</span>")       %>% 
      add_footnote("Sample Footnote")     %>% 
      set_font_size(4)