使用 Rmarkdown 编织到 pdf 时遇到麻烦

Question

knitr::opts_chunk$set(echo = TRUE)
library(tidyverse)
library(gt)

mpg.hp <- mtcars %>%
  select(mpg, hp) %>%
  gt() %>%
  cols_label(mpg = "Miles per Gallon", hp = "Horsepower") %>%
    tab_header(title = "Car Info") %>%
  cols_align(align = c("auto")) %>%
  fmt_number(columns = 1, decimals = 2) %>%
  fmt_number(columns = 2, decimals = 1)

mpg.hp

只是尝试做一些基本的事情，例如将数据框制作成表格并通过 RMarkdown 将包含该表格的 PDF 编织到其中。它将编织为 HTML，但除非我删除 mpg.hp 调用，否则它不会编织为 PDF。当我尝试编织成 PDF 时，我得到：

！ LaTeX 错误：这里没有一行可以结束。 错误：LaTeX 无法编译 stackoverflow1.tex。有关调试提示，请参阅https://yihui.org/tinytex/r/#debugging。有关更多信息，请参阅 stackoverflow1.log。 执行停止

我已访问错误消息中的网站并按照说明进行操作。我也尝试过使用内联代码来调用表，但都没有成功。有什么建议吗？

Answer 1

显然，gt 存在一个错误，当调用带有标题但没有副标题的 tab_header() 时，它不允许您编织到 pdf。我插入了一个空白字幕，这似乎可以解决问题。