Learnr for module 4

Author: phgrosjean

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: BioDataScience3
-Version: 2025.3.1
+Version: 2025.4.0
 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,3 +1,7 @@
+# BioDataScience3 2025.4.0
+
+-   Revision of **C04La_ts_intro** for 2025-2026.
+
 # BioDataScience3 2025.3.1
 
 -   A bug in {gradethis} is avoided (error when an object is generated, printed, and then, another object is generated with a wrong name in the same exercise). It appeared in **C01Lb_ml1**, **C02La_cv**, and **C02Lb_ml2**. The workaround consists in printing the intermediate object at the end of the exercise.

…_ts_intro/C04La_ts_intro.Rmd.inactivated …orials/C04La_ts_intro/C04La_ts_intro.Rmdinst/tutorials/C04La_ts_intro/C04La_ts_intro.Rmd.inactivated renamed to inst/tutorials/C04La_ts_intro/C04La_ts_intro.Rmd inst/tutorials/C04La_ts_intro/C04La_ts_intro.Rmd.inactivated renamed to inst/tutorials/C04La_ts_intro/C04La_ts_intro.Rmd

@@ -15,6 +15,32 @@ runtime: shiny_prerendered
 ```{r setup, include=FALSE}
 BioDataScience3::learnr_setup()
 SciViews::R("ts", lang = "fr")
+# Required for RSConnect
+# SciViews::R
+library(rlang)
+library(data.table)
+library(ggplot2)
+library(tibble)
+library(tidyr)
+library(dplyr)
+library(dtplyr)
+library(broom)
+library(forcats)
+library(collapse)
+library(fs)
+library(data.trame)
+library(svFast)
+library(svTidy)
+library(svMisc)
+library(svBase)
+library(svFlow)
+library(data.io)
+library(chart)
+library(tabularise)
+library(SciViews)
+# ... more
+library(pastecs)
+library(testthat)
 
 nottem <- read("nottem", package = "datasets")
 set.seed(13313)
@@ -186,7 +212,7 @@ grade_code("Pour spécifier le temps d'un objet **ts**, vous commencez par chois
 
 ### Série 2
 
-Toujours à partir du vecteur des observations `vec`, vous allez maintenant considérer que votre série fictive débute le 1er juillet 2005. Faites le même exercice que ci-dessus avec cette nouvelle information.
+Toujours à partir du vecteur des observations `vec`, vous allez maintenant considérer que votre série fictive débute le 1^er^ juillet 2005. Faites le même exercice que ci-dessus avec cette nouvelle information.
 
 ```{r ts2, exercise=TRUE}
 serie <- ts(vec, start = c(___,___), frequency = ___)