如何将图形导入为其原始高度/宽度比？

Question

我正在使用officedown 包来生成一个Word 文档。请问，如果我想从磁盘导入一个设计好的图形，如何控制officedown不改变图形的高宽比？

比如我原来的图是这样的：

但是，在officedown生成的Word文档中，是这样的：

请问，如何避免officedown中的失真？以及如何让图形的宽度走整条线？

我的问题可以通过以下代码重现：

---
output: officedown::rdocx_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(
    echo = FALSE,
    fig.cap = TRUE,
    message = FALSE,
    warning = FALSE
)
library(officedown)
library(officer)
```

```{r}
knitr::include_graphics("the file path to a figure")
```

非常感谢您的友好指导！

Answer 1

我做了一点实验。

对于输出：

bookdown::word_document2

...我没有找到任何解决方案。

但对于

officedown::rdocx_document

...建设

```{r fig.width=5, fig.height=5}
knitr::include_graphics("xxx.png") 
```

... 没有任何问题。

---

补充：

它应该适用于您的任务：

```{r}
library(imager)
my_pic <- load.image("xxx.png")
asp_rat <- dim(my_pic)[2]/dim(my_pic)[1] #find our aspect ratio

```

```{r fig.asp = asp_rat, fig.height = ??, fig.width = ??} #choose the best for your pic
knitr::include_graphics("xxx.png") 
```

看，长宽比被保存了。您应该只为每种情况确定 fig.height/width 。我还没有任何想法...