Barre de défilement verticale pour fonctions longues avec glissières

Question

Est-il possible de faire une barre de défilement verticale pour des fonctions longues avec des diapositives (en utilisant le style personnalisé xaringan)? J'essayais quelques options basées sur cette question précédente How to make vertical scrollbar appear in RMarkdown code chunks (html view) mais aucune idée comment le faire seulement pour de longues fonctions (quelle taille sort du cadre). Tout conseil est plus que bienvenue.

--- 
title: "title" 
subtitle: "subtitle" 
author: "author" 
date: "2017" 
output: 
    xaringan::moon_reader: 
    lib_dir: libs 
    css: ["default", "style.css"] 
    nature: 
     highlightStyle: zenburn 
     highlightLines: true 
     countIncrementalSlides: false 
--- 

```{r , echo=FALSE, include=FALSE} 
library(knitr) 
opts_chunk$set(fig.align='center', message=TRUE, error=TRUE, warning=TRUE, tidy=TRUE, comment = "##", echo = TRUE, dev='svg') 
options(width=65) 
``` 

```{r} 
fu <- function(x){ 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
    x 
} 
``` 

Answer 1

Je ne suis pas un expert en CSS ne peut donc pas garantir que c'est une solution robuste, mais en ajoutant max hauteur et trop-plein-y pour le style de blocs de code semble bien fonctionner. Ajustez le maximum de la hauteur nécessaire, 200px est assez court et utilisé uniquement pour montrer comment cela fonctionne:

<style> 
pre.sourceCode { 
    max-height: 200px; 
    overflow-y: auto; 
} 
</style> 

Je ne sais pas si le nom de classe pour les blocs de code change avec différents formats de sortie, j'utilisais slidy_presentation comme je n'avais pas installé votre moteur de rendu, vous devrez peut-être vérifier la classe sur votre sortie.

Answer 2

Avez-vous essayé la solution de this answer

.scrollable-slide { 
    height: 800px; 
    overflow-y: auto !important; 
}