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

编程问答 2022-06-08

问题描述

我正在为一个R包制作一个小插图，在这里我想展示如何在两个R包中执行相同的操作。我的首选方法是包括几个表，在这些表中，彼此相邻显示适当的代码，如下所示：

enter image description here

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

有没有办法在rmarkdown中实现类似的功能？

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

解决方法

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

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

这使您可以在R块中显示代码 enter image description here

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

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

enter image description here

实际上将您的 r 代码呈现为 markdown 代码

,

如何使用我的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)

结果：

Screenshot

flextablegtgthuxtablekableextrareactable