R语言 如何打印多个gt表在一个夸托块?

xdnvmnnf  于 2023-04-18  发布在  其他
关注(0)|答案(2)|浏览(117)

我有一个gt表的列表,我想显示。我似乎记得在RMarkdown中,我可以在一个块中使用walk(tabs, print)语句,并带有results = "asis"块选项。
我不知道怎么用四开本?有什么建议吗?
这是我尝试过的,但它无法呈现。

---
title: "Untitled"
format: html
editor: source
---

```{r}
library(tidyverse)
library(gt)
df <- mtcars[1:5, 1:2] 
tab <- gt(df)
#| results: asis
rep(list(tab), 3) %>%
  walk(print)

渲染错误如下:

Error running filter C:/Users/xxxxx/AppData/Local/Programs/Quarto/share/filters/quarto-pre/quarto-pre.lua:
.../Programs/Quarto/share/filters/quarto-pre/quarto-pre.lua:2555: attempt to concatenate a nil value (local 'v')
stack traceback:
.../Programs/Quarto/share/filters/quarto-pre/quarto-pre.lua:2562: in function <.../Programs/Quarto/share/filters/quarto-pre/quarto-pre.lua:2560>

5ktev3wc

5ktev3wc1#

夸托喜欢你给它输入gtas_raw_html

---
title: "Untitled"
format: html
editor: source
---

```{r}
library(tidyverse)
library(gt)
df <- mtcars[1:5, 1:2] 
tab <- gt(df)
#| results: asis
rep(list(tab), 3) %>%
  map(as_raw_html) |> 
  walk(print) 

ftr我得到了同样的消息,你甚至在我更新了夸托。
aemubtdh

aemubtdh2#

我更新了夸托CLI软件,quarto包,rmarkdown和knitr,错误消失了。感谢所有参与进来的人。

相关问题