Incorporation d'images évolutives dans le fichier de sortie R Markdown HTML

Question

J'essaie actuellement de trouver un moyen d'incorporer des images externes (PNG) dans mon fichier de sortie HTML markdown R d'une manière évolutive . Ce que j'ai essayé jusqu'ici ne les définit qu'à une largeur égale à l'espace disponible dans le fichier HTML (je ne sais pas combien il est en pixels, peut-être autour de 800px) même si la taille de l'image est ~ 1500x700. Ce que je voudrais, c'est que lorsque j'augmente la taille de la fenêtre HTML, les images augmentent aussi, au moins jusqu'à leur résolution d'origine. Down-scaling fonctionne sans problèmes.

Mes tentatives:

```{r fig.width=100, fig.height=55, echo=FALSE} 
library(png) 
library(grid) 
img <- readPNG("images/image.png") 
grid.raster(img) 
``` 

et

<img src="images/image.png"> 

... sans succès.

Quelqu'un at-il une idée de comment faire cela? J'apprécierais vraiment votre aide :)

Answer 1

Vous pouvez utiliser out.width au lieu de fig.width et fig.height, avec le pourcentage, qui sera le pourcentage de la zone de texte. Vous pouvez l'utiliser avec include_graphics(). Si vous ne définissez pas out.height, le taux restera correct.

```{r, echo=FALSE, out.width='80%'} 
knitr::include_graphics("images/image.png") 
```