r - 使用 kable_styling 抑制长 html 输出

Question

我的包中的一个函数使用kable()and生成一个表格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)

Answer 1

您可以使用capture.output停止在控制台中打印输出，但仍会在查看器中显示它。

x <- mpg %>% kable(format = "html") %>% kable_styling() %>% capture.output()