将四开PDF表格输出缩放以适应页面

Question

将四开PDF表格输出缩放以适应页面

6

如何在Quarto中调整表格大小以适应PDF页面？

示例：

---
title: "Untitled"
format: pdf
---

```{r setup}
#| include: false

library(dplyr)
library(gt)
```


```{r tbl}
#| include: true
#| echo: false


tibble(a = 1000, b = 2000, c = 3000, d = 4000, e = 5000, f = 6000, g = 7000, 
       h = 8000, i = 9000, j = 10000, k = 11000, l = 12000, m = 13000, n = 14000, 
       o = 15000, p = 16000, q = 17000, r = 18000, s = 19000, t = 20000, u = 21000, 
       v = 22000, w = 23000, x = 24000, y = 25000, z = 26000) %>% 
  gt()
```

此方法生成的PDF文档中表格超出页面：

我尝试使用gt库中的tab_options()函数，但它似乎只适用于HTML输出。

- nicholas

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- shafee · Accepted Answer

您的列数太多了，无法适应纵向模式，建议尝试横向模式。

但是，如果您想要适应这些过多的列，可以使用小字体大小，减少列之间的间隙，并从左右边距中留出一些空间。

---
title: "Untitled"
format: pdf
---

```{r setup}
#| include: false

library(dplyr)
library(gt)
```

\begingroup
\setlength{\LTleft}{0pt minus 500pt}
\setlength{\LTright}{0pt minus 500pt}
\fontsize{5pt}{7pt}\selectfont
\addtolength{\tabcolsep}{-3pt}

```{r tbl, results='asis'}
#| include: true
#| echo: false

tibble(a = 1000, b = 2000, c = 3000, d = 4000, e = 5000, f = 6000, g = 7000,
       h = 8000, i = 9000, j = 10000, k = 11000, l = 12000, m = 13000, n = 14000,
       o = 15000, p = 16000, q = 17000, r = 18000, s = 19000, t = 20000, u = 21000,
       v = 22000, w = 23000, x = 24000, y = 25000, z = 26000) %>%
  gt() %>%
  as_latex()
```
\endgroup