在Quarto PDF中确保两个不同gt表格宽度一致（如整页宽度）

一、使用Quarto代码块选项 + knitr/kableExtra #

如果你用knitr或kableExtra生成表格，可通过代码块参数和表格样式组合控制宽度：

• 占满整页宽度的表格
  在代码块中设置out.width="100%"，同时用kable_styling(full_width = TRUE)强制表格拉伸至页面宽度：

  {r, out.width="100%"}
  library(kableExtra)
  
  # 生成占满宽度的表格
  mtcars[1:5, 1:4] %>%
    kbl() %>%
    kable_styling(full_width = TRUE)
  

• 窄表格
  调整out.width为目标百分比（比如50%），并关闭full_width避免自动拉伸：

  {r, out.width="50%", fig.align="center"}
  # 生成窄表格并居中显示
  mtcars[1:3, 1:2] %>%
    kbl() %>%
    kable_styling(full_width = FALSE)
  

二、使用gt包的自定义选项 #

如果用gt包创建表格，直接通过tab_options()设置table.width参数即可：

• 占满整页宽度的表格
  用pct(100)指定宽度为页面的100%：

  {r}
  library(gt)
  
  mtcars[1:5, 1:4] %>%
    gt() %>%
    tab_options(table.width = pct(100))
  

• 窄表格
  设置更小的百分比（比如40%），PDF中推荐用百分比适配页面，也可尝试px()指定固定宽度：

  {r, fig.align="center"}
  mtcars[1:3, 1:2] %>%
    gt() %>%
    tab_options(table.width = pct(40))
  

额外适配提示 #

如果表格列过多导致内容挤压，可调整字体大小优化显示：

• kableExtra：kable_styling(font_size = 10)
• gt：tab_options(table.font.size = 10)

内容的提问来源于stack exchange，提问作者Stats Iliterate