使用pagedown::chrome_print(R包)将页码添加到pdf?

Add page numbers to pdf using pagedown::chrome_print (R package)?

我正在使用 pagedown::chrome_print() 将使用 Rmarkdown 创建的滑动演示文稿转换为 pdf——它比从 Chrome 保存为 PDF 做得更好。但是,尽管研究了帮助文件,我还是不知道如何添加页码。有办法吗?

(注意这里的pagedown指的是R包,不是JavaScriptmarkdown预览器。)

我让它与自定义 CSS 文件一起使用。我创建了一个名为 custom.css 的文件并包含在该文件中的是

@page  {
  @bottom-right {
    content: counter(page);
  }
}

然后我将它与其他 pagedown 默认值一起使用 header 像这样

title: "My Report"
output:
  pagedown::html_paged: 
    css: ["custom.css", "default-fonts", "default"]

抱歉,如果帮助页面在这一点上不清楚。

可以使用 pagedown::chrome_print() 将 header/footer 选项传递给 Chrome。

这些选项是由 Chrome DevTools 协议为 Page.printToPDF method 定义的。

您可以使用 HTML 模板自定义页眉和页脚。 Chrome 还提供以下值:datetitleurlpageNumbertotalPages

根据此帮助页面上的说明,这里是打印页码的示例:

library(htmltools)

footer <- div(
  style = "font-size: 8pt; text-align: right; width: 100%; padding-right: 12pt;", 
  span(class = "pageNumber"), "/", span(class = "totalPages")
)

pagedown::chrome_print(
  "slidy.Rmd", 
  options = list(
    landscape = TRUE, 
    displayHeaderFooter = TRUE, 
    footerTemplate = format(footer, indent = FALSE),
    marginTop = 0,
    marginBottom = 0.4
  )
)