我的软件包中的一个函数使用kable()
和kable_styling()
生成一个表。运行此代码时,我在查看器中看到了输出,在控制台中看到了很长的HTML代码。我看到了在Rmd中排除HTML输出但不针对功能的解决方案。它还仅在我使用pkgdown::build_site()
我尝试过invisible()
,sink()
,并且使用的是最新版本的kableExtra
(1.1.0)
如何获取它,使其仅在查看器中显示结果,并在功能的参考页中正确显示?
我不确定如何重新表达pkgdown
的内容,但这应该足以取得一些进展。
library(tidyverse)
library(knitr)
library(kableExtra)
mpg %>%
kable(format = "html") %>%
kable_styling()
# same result
x <- mpg %>% kable(format = "html")
kable_styling(x)
答案 0 :(得分:2)
您可以使用capture.output
停止在控制台中打印输出,但仍在查看器中显示。
x <- mpg %>% kable(format = "html") %>% kable_styling() %>% capture.output()