Est-il possible d'afficher plusieurs images dans un bloc dans R markdown avec une barre de défilement verticale

Question

J'essaie de créer un rapport dans R Markdown (avec une sortie html) qui intègre plusieurs images IRM du cerveau en utilisant une barre de défilement verticale. Le but ultime est de pouvoir utiliser la barre de défilement pour parcourir les images du cerveau de haut en bas ou vice versa. J'ai vu le message suivant: How to display image horizontally in scroll bar? mais je ne sais pas comment utiliser ce code dans R markdown. Je suis très novice dans le codage, donc je ne suis pas sûr de la difficulté de mon problème. J'utilise la fonction knitr :: include_graphics pour afficher mes images en HTML, et je me demande ce que je devrais ajouter pour faire défiler verticalement ces images.

Un exemple en utilisant 3 images dans le rapport est la suivante:

```{r echo=FALSE, out.width='100%', fig.align="center"} 
library(knitr) 
knitr::include_graphics('1.jpg') 
knitr::include_graphics('2.jpg') 
knitr::include_graphics('3.jpg') 
``` 

Que dois-je ajouter à ce morceau dans R Markdown, pour permettre le défilement vertical de ces images? Toute aide est appréciée, car le lien que j'ai décrit précédemment était au-dessus de mon niveau de compréhension.

Merci.

Answer 1

Ce qui suit devrait fonctionner mais vous oblige à définir manuellement la largeur et la hauteur de votre boîte.

# Put this in your css (without the style tags), or at the top of your Rmd document 
<style> 
.vscroll-plot { 
    width: 1000px; 
    height: 200px; 
    overflow-y: scroll; 
    overflow-x: hidden; 
} 
</style> 

# In your Rmd document wrap your code chunk in div tags with class vscroll-plot 
<div class="vscroll-plot"> 
```{r pressure, echo=FALSE} 
plot(mtcars$hp, mtcars$drat); 
plot(mtcars$disp, mtcars$qsec); 
``` 
</div> 

Ceci vous donnera deux parcelles avec une barre de défilement verticale si les parcelles dépassent la hauteur spécifiée.

Answer 2

Une alternative à une barre de défilement pourrait être une simple visionneuse intégrée permettant de basculer entre les images. Par exemple, si toutes les images ont les mêmes dimensions XY, vous pouvez utiliser celle fournie par le paquet BioconductorEBImage (pour le moment, cette fonctionnalité est disponible uniquement dans la branche développement qui peut être obtenue à partir de GitHub).

library("EBImage") 

imgs <- c('1.jpg', '2.jpg', '3.jpg') 
display(readImage(imgs), method="browser")