kableextra - 如何在 rmarkdown 的表格单元格中嵌入格式化的 R 代码？

Question

我正在为一个 R 包做一个小插图，我想展示如何在两个 R 包中做同样的事情。我的首选方法是包含几个表，我可以在其中显示适当的代码，如下所示：

我不关心确切的字体，但我希望看到 R 代码的布局清晰明了，就像它在常规的 rmarkdown 块中一样，然后在表格的单元格中。

有没有办法在 rmarkdown 中实现这样的目标？

（我想可以通过直接输入 html 来完成，但这会很麻烦，因为我不太了解 html。）

Answer 1

如果我正确理解您的问题，您只是希望 R 代码能够在 Rmarkdown 中显示？

`r ''````{r}
setup <- pacakge2::gogo(x) %>% 
dplyr::filter(blabla2)
packages2::plot(setup)
```

这允许您在 R 块中显示您的代码

如果你想显示你的整个代码，你可以这样做

````markdown
`r ''````{r}
steup <- pacakge2::gogo(x) %>% 
dplyr::filter(blabla2)
packages::plot(setup)
```
````

这实际上将您的r代码呈现为降价代码

Answer 2

如何使用我的 huxtable 包进行操作。您至少需要 5.0 版。

library(huxtable)
hx <- huxtable(
        c("", "Goal A", "Goal B", "Goal C"), 
        c("Package 1", "", "", ""), 
        c("Package 2", "", "", "")
      )
hx[2, 2] <- "`setup <- package1::start_run()`"
markdown(hx)[2, 2] <- TRUE
quick_pdf(hx)

结果：