如何生成闪亮仪表板的dashboardBody的PDF？

Question

我有一个使用shiny 和shinydashboard 包用R 编写的仪表板。这样的仪表板由标题、侧边栏和正文组成。这是一个简约的例子：

library(shinydashboard)

ui <- dashboardPage(
  header = dashboardHeader(),
  sidebar = dashboardSidebar(),
  body = dashboardBody(h2("This goes into the PDF."))
)

shinyApp(ui = ui, server = function(input, output) {})

我想将仪表板的正文导出为 PDF。这实际上是打印在 Safari 中打开的仪表板时的默认操作。

但是，我想以编程方式将仪表板的正文导出为 PDF。如何用 R 或 Javascript 编写这样的函数？

Answer 1

我前段时间遇到过这个问题，发现如果你通过浏览器打开你的应用，当使用浏览器工具打印时，它只会按要求打印正文。