将 Rmarkdown 的报告表格和数字保存到文件答案

【问题标题】：Save Rmarkdown's report tables and figures to file将 Rmarkdown 的报告表格和数字保存到文件
【发布时间】：2017-06-23 00:35:02
【问题描述】：

简单的问题：

我有一个Rmarkdown 脚本，用于生成表格和数字：

---
title: "test"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r libraries}
library(knitr)
library(kableExtra)
library(ggplot2)
```


# Table
```{r print.table,warning=FALSE,message=FALSE}
df <- data.frame(id=LETTERS,value=1:26)
knitr::kable(df) %>% kable_styling()
```


# Figure
```{r print.params.table,warning=FALSE,message=FALSE}
ggplot(data=df,aes(x=id,y=value))+geom_point()
```

我的问题是，是否有办法将表格和数字从 html 报告中保存到文件（例如，分别为 csv 和 pdf）？

我的意思是假设我将这个 html 报告发送给一个合作者，他想要一份单独的表格和数字副本，而无需编写任何代码行。 Rmarkdown 或 knitr 是否以按钮的形式在 html 报告中启用它，还是我必须以编程方式将这些保存到文件中？

【问题讨论】：

什么意思？您想以编程方式、自动还是手动方式保存它们？
1) write.csv(), 2) pdf()...dev(off) 在带有echo = FALSE的最终代码块中
我更新了我的问题以澄清这些观点

标签： r r-markdown

【解决方案1】：

如果您添加keep_md 选项，则图像文件将保存在您的目录中（如“xxx_file”文件夹中），您可以将其发送给您的同事。但我认为没有表格的选项。

---
title: "test"
output: 
  html_document:
      keep_md: true
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r libraries}
library(knitr)
library(kableExtra)
library(ggplot2)
```


# Table
```{r print.table,warning=FALSE,message=FALSE}
df <- data.frame(id=LETTERS,value=1:26)
knitr::kable(df) %>% kable_styling()
```


# Figure
```{r print.params.table,warning=FALSE,message=FALSE}
ggplot(data=df,aes(x=id,y=value))+geom_point()
```

【讨论】：

【解决方案2】：

我找到的表格解决方案如下：

library(knitr)
library(kableExtra)
library(here)
library(ggplot2)

df <- data.frame(id = LETTERS, value = 1:26)

df %>% kable(format = "latex", booktabs = TRUE) %>% 
  kable_styling() %>% 
  kable_as_image(filename = here("Tables", "test"), 
                 file_format = "jpeg", keep_pdf = F)

您还可以将 keep_pdf 切换为 TRUE，这样您的表格也是 pdf 格式的。

【讨论】：