使用 kable_styling 抑制长 html 输出答案

【问题标题】：Supress long html output with kable_styling使用 kable_styling 抑制长 html 输出
【发布时间】：2020-08-11 19:28:57
【问题描述】：

我的包中的一个函数使用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)

【问题讨论】：

标签： r knitr kableextra pkgdown

【解决方案1】：

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

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

【讨论】：

谢谢，我自己是不会发现的。好奇它只在有任务时才有效。我试图在没有的情况下调用它。