r - Rmarkdown PDF 中数据表屏幕截图中的空白

Question

我面临着一个新的问题，即在 pdf 文档中截取 html 小部件的屏幕截图以供进一步实现。 datatable(DT 包)的屏幕截图高度太高，在 rmarkdown 文档中显示为空白(很容易被fig.cap 的位置，位于 datatable 末尾下方)。我无法理解为什么会发生这种情况，我想删除它(数据表下没有空格)。看一下下面的 test.Rmd 示例，它充分显示了问题:

---
output:
  pdf_document:
    toc: yes
header-includes:
    - \usepackage{fancyhdr}
    - \usepackage[ngerman]{babel}
---
\addtolength{\headheight}{1.0cm} 
\pagestyle{fancyplain} 
\renewcommand{\headrulewidth}{0.4pt}
\renewcommand{\footrulewidth}{0.4pt}
\chead{Test}
\lhead{\scriptsize\today}


```{r, fig.align='center', fig.pos='htb!', fig.width=12, fig.cap="The height of screenshot is too high!!",fig.height=3,echo=FALSE, cache=FALSE, warning = FALSE, message = FALSE, tidy=TRUE}
library(DT)
library(webshot)
datatable(mtcars[1:2,],rownames=FALSE, options = list(dom='t',ordering=F))
```

• 此外，我在datatable中尝试了不同数量的显示行，并且我注意到如果datatable有> 20行，那么数字是显示良好并带有标题。
• 但是，原始 pdf 文件中的表格有 2 行(可以多一点 --> 行数是 react 性的，因为这个 rmarkdown 是属于 shiny 应用程序的可下载报告)，这就是为什么在示例中我只使用了 mtcars 数据集中的两行。

Answer 1

您可以尝试将以下内容添加到r chunk并看看是否有效:

screenshot.opts = list(delay = 1, cliprect = c(0, 0, 1000, 150)), dev='jpeg'