r - kableExtra：在下一页继续长表

Question

我正在使用kableExtra以下longtable代码。

library(knitr)
library(kableExtra)

long_dt <- rbind(mtcars, mtcars)

kable(
      long_dt, 
      format    = "latex", 
      longtable = T, 
      booktabs  = T, 
      caption   = "Longtable"
      ) %>%
add_header_above(c(" ", "Group 1" = 5, "Group 2" = 6)) %>%
kable_styling(latex_options = c("repeat_header"))

输出是

我想知道如果它跨越到下一页，如何在表格底部添加文本（续在下一页...） 。

Answer 1

有一个 kableExtra 参数。我没有检查过，但我想当问题首次发布时它不可用。

从文档中：

repeat_header_continued：T/F 或文本字符串。是否在longtable的第二页加续标记。如果您输入文本，我们将使用此文本作为“继续”标记。

默认值为（继续...），因此对于您的特定情况，它将是：

library(knitr)
library(kableExtra)

long_dt <- rbind(mtcars, mtcars)

kable(
      long_dt, 
      format    = "latex", 
      longtable = T, 
      booktabs  = T, 
      caption   = "Longtable"
      ) %>%
add_header_above(c(" ", "Group 1" = 5, "Group 2" = 6)) %>%
kable_styling(latex_options = c("repeat_header"),
              repeat_header_continued = "\\textit{(Continued on Next Page...)}")

输出：