Correction of the lt_h1 exercise from learnr **C05Lb_ts_decomp**

Author: GuyliannEngels

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: BioDataScience3
-Version: 2025.6.0
+Version: 2025.6.1
 Title: A Series of Learnr Documents for Biological Data Science 3
 Description: Interactive documents using learnr for studying biological data science (second course).
 Authors@R: c(

NEWS.md

@@ -1,5 +1,9 @@
 # BioDataScience3 2025.6.0
 
+-   Correction of the lt_h1 exercise from learnr **C05Lb_ts_decomp**
+
+# BioDataScience3 2025.6.0
+
 -   Revision of **C06La_map** for 2025-2026 (still non C06Lb_interp).
 
 # BioDataScience3 2025.5.0

inst/tutorials/C05Lb_ts_decomp/C05Lb_ts_decomp.Rmd

@@ -233,13 +233,14 @@ Réalisez maintenant le graphique pour l'analyse des tendances locales, toujours
 
 ```{r lt_h1, exercise=TRUE, exercise.lines=9}
 # Préparation de deux graphiques superposés avec marges ajustées
-par(mfrow = c(2, 1), mar = c(4, 4, 1, 1))
+opar = par(mfrow = c(2, 1), mar = c(4, 4, 1, 1))
 # Tendances locales pour la composante de tendance
 loc <- ___
 # Annotation et second graphique de la composante saisonnière
 abline(v = c(1972, 1982, 1987, 1991), col = "red", lty = 2)
 plot(fl_mts[, "seasonal"])
 abline(v = c(1972, 1982, 1987, 1991), col = "red", lty = 2)
+par(opar)
 ```
 
 ```{r lt_h1-solution}