在 Rmd pdf 输出中包装 add_header_above答案

【问题标题】：Wrap add_header_above in Rmd pdf output在 Rmd pdf 输出中包装 add_header_above
【发布时间】：2018-06-06 15:52:13
【问题描述】：

问题

如何在上面包裹标题（由add_header_above()插入）？

There is a simple way 对一个分层标题执行此操作，但在有第二个（或第三个）标题时不起作用。

可重现的例子

library(kableExtra)
names(iris) <- c("L", "W", "L", "W", " ")
iris[1:2, ] %>% 
  kable("latex") %>% 
  add_header_above(
    c(
      "Sepal is great" = 2, 
      "Petal is better, (in fac my favorite)" = 2, 
      "nc" = 1)
    ) %>%
  column_spec(2:ncol(iris), width = "0.3in")

当前输出的样子

R 代码的预期输出（粗略）

【问题讨论】：

最后，我只想让表格适合一页，最好继续使用 kable。

标签： latex r-markdown kableextra

【解决方案1】：

正如我在Best Practice for newline in LaTeX table 中所说，如果您在所有 kableExtra 函数中都需要换行符，只需使用 \n。否则，你可以试试linebreak函数。

library(kableExtra)
names(iris) <- c("L", "W", "L", "W", " ")
iris[1:2, ] %>% 
  kable("latex") %>% 
  add_header_above(
    c(
      "Sepal\nis great" = 2, 
      "Petal is better,\n(in fac my favorite)" = 2, 
      "nc" = 1)
    ) %>%
  column_spec(2:ncol(iris), width = "0.3in")

【讨论】：