如何在 Markdown 中部署 kable 表乳胶格式答案

【问题标题】：How to deploy kable table latex format in markdown如何在 Markdown 中部署 kable 表乳胶格式
【发布时间】：2021-09-03 08:36:12
【问题描述】：

我需要创建很多 kable 表，所以我使用 for 循环并将这些表存储在一个列表中，但是当我尝试从 markdown 列表中部署 kable 表时，结果是乳胶代码，而不是pdf，我该怎么解决呢？

table <- data.frame(col1 = c(1:30), col2 = c(rep(a, 10), rep(b, 10), rep(c, 10)))

t_list <- list()

for (letter in unique(table$col2)){
    a <- table %>% filter(col2 == letter)
    aa <- a %>% kbl()
    t_list <- append(t_list, aa)
}

# R Markdown ------------------
\```{r}
t_list[[1]]
\```

# output in latex not in pdf

谢谢

【问题讨论】：

您想要一个 kable 表的 pdf 输出文档吗？为什么不直接使用kable(t_list[[1]])？

标签： r r-markdown pdflatex kable kableextra

【解决方案1】：

解决方案应该相对简单，通过询问内联输出 (r t_list[[1]])，而不是在 R 代码块中。像这样，我能够重现您的代码并生成打印第一个表格的 PDF，如您上面的代码中所示：

```{r}
table <- data.frame(col1 = c(1:30), col2 = c(rep("a", 10), rep("b", 10), rep("c", 10)))

t_list <- list()

for (letter in unique(table$col2)){
    a <- table %>% filter(col2 == letter)
    aa <- a %>% kbl() %>%
kable_styling(latex_options = "striped")
    t_list <- append(t_list, aa)
    aa
}
```

# R Markdown ------------------
`r t_list[[1]]`

将此图像视为一个简单示例： PDF output

希望这会有所帮助，但如果没有，请告诉我。

【讨论】：