CSS added for better printing

Author: phgrosjean

inst/tutorials/A00La_discovery/A00La_discovery.Rmd

@@ -232,3 +232,15 @@ Si vous voulez, vous pouvez encore tester d'autres commandes R ci-dessous :
 ```{r code_noscore-check}
 
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A01La_base/A01La_base.Rmd

@@ -530,3 +530,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A01La_tools/A01La_tools.Rmd.notusedanymore

@@ -5,7 +5,7 @@ description: "**SDD I Module 1** Familiarisation avec les logiciels du cours."
 tutorial:
   id: "A01La_tools"
   version: 2.2.1/4
-output: 
+output:
   learnr::tutorial:
     progressive: true
     allow_skip: true
@@ -99,3 +99,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A01Lb_scatterplot/A01Lb_scatterplot.Rmd

@@ -365,3 +365,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A02La_progression/A02La_progression.Rmd.inactivated

@@ -264,7 +264,7 @@ Le calcul un à un de l'IMC de chaque individu deviendra très rapidement fastid
 weight_w <- c(69, 49, 75, 66, 54)
 # Assignation des valeurs de tailles dans un vecteur nommé `height_w`
 height_w <- c(174, 155, 169, 179, 168)
-# Transformation du vecteur `height_w` de centimètre en mètre 
+# Transformation du vecteur `height_w` de centimètre en mètre
 height_w <- height_w / 100
 # Calcul de l'IMC/BMI
 weight_w / height_w^2
@@ -299,7 +299,7 @@ Réalisez les mêmes opérations sur les individus 8 à 12 qui sont des hommes.
 weight_m <- c(___)
 # Assignation des valeurs de tailles dans un vecteur nommé `height_m`
 height_m <- ___
-# Transformation du vecteur `height_m` de centimètre en mètre 
+# Transformation du vecteur `height_m` de centimètre en mètre
 height_m <- height_m / 100
 # Calcul de IMC
 ___
@@ -310,7 +310,7 @@ ___
 weight_m <- c(82, 73, 105, 61, 95)
 # Assignation des valeurs de tailles dans un vecteur nommé `height_m`
 height_m <- ___
-# Transformation du vecteur `height_m` de centimètre en mètre 
+# Transformation du vecteur `height_m` de centimètre en mètre
 height_m <- ___
 # Calcul de IMC
 weight_m / height_m^2
@@ -324,7 +324,7 @@ weight_m / height_m^2
 weight_m <- c(82, 73, 105, 61, 95)
 # Assignation des valeurs de tailles dans un vecteur nommé `height_m`
 height_m <- c(174, 186, 203, 172, 190)
-# Transformation du vecteur `height_m` de centimètre en mètre 
+# Transformation du vecteur `height_m` de centimètre en mètre
 height_m <- height_m / 100
 # Calcul de IMC
 weight_m / height_m^2
@@ -470,7 +470,7 @@ Pour calculer l'IMC sur le jeu de données `bio_100`, nous employons à nouveau
 
 ```{r, echo=TRUE}
 bio_100 <- smutate(bio_100, bmi = weight / (height / 100)^2)
-# Afficher les premières lignes du tableau de données 
+# Afficher les premières lignes du tableau de données
 head(bio_100, n = 5)
 ```
 
@@ -571,7 +571,7 @@ biometry <- smutate(biometry, bmi_cat = case_when(
   bmi>= 25 & bmi < 30 ~"overweight",
   bmi >= 30 ~ "obese"
 ))
-# Afficher les 5 premières lignes du tableau 
+# Afficher les 5 premières lignes du tableau
 head(biometry)
 ```
 
@@ -758,3 +758,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A02Lb_univariate/A02Lb_univariate.Rmd.inactivated

@@ -17,7 +17,7 @@ runtime: shiny_prerendered
 BioDataScience1::learnr_setup()
 SciViews::R()
 # Dataset
-urchin <- read("urchin_bio", package = "data.io", lang = "fr") 
+urchin <- read("urchin_bio", package = "data.io", lang = "fr")
 zooplankton <- read("zooplankton", package = "data.io", lang = "fr")
 copepoda <- fsubset(zooplankton, class %in%
   c("Calanoid", "Cyclopoid", "Harpacticoid", "Poecilostomatoid"))
@@ -61,17 +61,17 @@ chart(biometry, ~ age | gender) +
 ```
 
 ```{r histo_h3, exercise=TRUE}
-chart(___, ~ ___ ___ ___) + 
+chart(___, ~ ___ ___ ___) +
   ___(___)
 ```
 
 ```{r histo_h3-hint-1}
-chart(DF, ~ ___ | ___) + 
+chart(DF, ~ ___ | ___) +
   geom_histogram(___)
 ```
 
 ```{r histo_h3-hint-2}
-chart(biometry, ~ NUM | FACTOR) + 
+chart(biometry, ~ NUM | FACTOR) +
   geom_histogram(bins = ___)
 
 #### Attention : solution dans le 'hint' suivant! ####
@@ -218,30 +218,30 @@ Reproduisez le graphique suivant qui représente la répartition de taille (`siz
 
 ```{r ggridges_intro}
 chart(copepoda, class ~ size %fill=% class) +
-  ggridges::geom_density_ridges(show.legend = FALSE) 
+  ggridges::geom_density_ridges(show.legend = FALSE)
 ```
 
 ```{r ggridges_h3, exercise=TRUE}
 chart(___, ___ ~ ___ ___ ___) +
-  ___(___) 
+  ___(___)
 ```
 
 ```{r ggridges_h3-hint-1}
 chart(DF, ___ ~ ___ %fill=% ___) +
-  ggridges::geom_density_ridges(___) 
+  ggridges::geom_density_ridges(___)
 ```
 
 ```{r ggridges_h3-hint-2}
 chart(copepoda, FACTOR ~ NUM %fill=% FACTOR) +
-  ggridges::geom_density_ridges(show.legend = ___) 
+  ggridges::geom_density_ridges(show.legend = ___)
 
 #### Attention : solution dans le 'hint' suivant! ####
 ```
 
 ```{r ggridges_h3-solution}
 ## Solution ##
 chart(copepoda, class ~ size %fill=% class) +
-  ggridges::geom_density_ridges(show.legend = FALSE) 
+  ggridges::geom_density_ridges(show.legend = FALSE)
 ```
 
 ```{r ggridges_h3-check}
@@ -254,25 +254,25 @@ Reproduisez le graphique suivant qui représente la répartition de taille (`siz
 
 ```{r ggridges2_intro}
 chart(zooplankton, class ~ size) +
-  ggridges::geom_density_ridges() 
+  ggridges::geom_density_ridges()
 ```
 
 ```{r ggridges2_h2, exercise=TRUE}
 chart(___, ___ ~ ___) +
-  ___() 
+  ___()
 ```
 
 ```{r ggridges2_h2-hint}
 chart(DF, FACTOR ~ NUM) +
-  ggridges::geom_density_ridges() 
+  ggridges::geom_density_ridges()
 
 #### Attention : solution dans le 'hint' suivant! ####
 ```
 
 ```{r ggridges2_h2-solution}
 ## Solution ##
 chart(zooplankton, class ~ size) +
-  ggridges::geom_density_ridges() 
+  ggridges::geom_density_ridges()
 ```
 
 ```{r ggridges2_h2-check}
@@ -386,3 +386,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```

inst/tutorials/A02Lc_git/A02Lc_git.Rmd.inactivated

@@ -5,7 +5,7 @@ description: "**SDD I Module 2** Vocabulaire lié à la gestion de versions avec
 tutorial:
   id: "A02Lc_git"
   version: 2.0.1/6
-output: 
+output:
   learnr::tutorial:
     progressive: true
     allow_skip: true
@@ -160,3 +160,15 @@ question_text(
   allow_retry = TRUE
 )
 ```
+
+```{css, echo=FALSE}
+@media print {
+  .topics {
+    width: 100% !important;
+    padding: 0 0.5em 0 !important;
+  }
+  .topicsContainer, .topicsContainer *, .learnrBanner, .learnrBanner *, .topicActions, .topicActions * {
+    display: none !important;
+  }
+}
+```