r - 将 knitr::kable() 输出保存到 html 文件 R

Question

我有一个 knitr_kable 输出，我想将它保存为 R 中的 HTML 文档。我需要它从我的 R 脚本中自动运行，无需人工参与。例如:

dt <- mtcars[1:5, 1:6]
kable(dt, "html") %>% kable_styling(bootstrap_options = c("striped", "hover"))

这有 html 输出，但类是 knitr_kable所以我不能将它写入表格或 html 文件，因为它不能被强制转换为数据帧。

class(kable(dt, "html"))
[1] "knitr_kable"

有没有人有将这些 kables 之一保存为 html 文件的方法？

我试过了:

library(xml2)
options(knitr.table.format = "html") 
write_html(kable(dt, "html"), "df.html")))

这有错误:

Error in UseMethod("write_html") : no applicable method for 'write_html' applied to an object of class "knitr_kable"

我的猜测是 knitr_kable 对象必须首先被强制转换为 html 对象，然后保存为 html 文件。但我不知道该怎么做。

Answer 1

cat函数会做你需要的。

library(knitr)
library(kableExtra)
library(magrittr)

dt <- mtcars[1:5, 1:6]

kable(dt, "html") %>%
  kable_styling(bootstrap_options = c("striped", "hover")) %>%
  cat(., file = "df.html")

结果表如下所示: