如何在Xaringan+RMarkdown中实现参考文献自动分页展示

你可以通过自定义R函数实现自动拆分分页，无需手动计算每条的起止范围，操作步骤如下：

• 首先在文档前置代码块（通常是setup块）中定义自动分页函数：

# 入参：bib为你加载好的参考文献对象，per_page为每页展示条数，默认10
print_bib_auto <- function(bib, per_page = 10) {
  total_entries <- length(bib)
  total_pages <- ceiling(total_entries / per_page)
  
  for (page in seq_len(total_pages)) {
    start_idx <- (page - 1) * per_page + 1
    end_idx <- min(page * per_page, total_entries)
    # 打印当前页参考文献
    PrintBibliography(bib, start = start_idx, end = end_idx)
    # 非最后一页自动插入xaringan分页符
    if (page < total_pages) {
      cat("\n---\n\n")
    }
  }
}

• 在需要放置参考文献的位置插入代码块，调用上述函数即可：

注意：该代码块必须设置results='asis'参数，否则分页符和参考文献格式无法正常渲染，建议同时设置echo=FALSE隐藏函数调用代码。

# 直接调用即可自动生成分页的参考文献列表，默认每页10条
print_bib_auto(myBib)

# 如需调整每页条数，传入per_page参数即可，例如下方设置为每页8条
# print_bib_auto(myBib, per_page = 8)

内容的提问来源于stack exchange，提问作者Marie Etienne