From 4555ef38eb5c93f445d269ec68cbfa1de51e45a5 Mon Sep 17 00:00:00 2001 From: Arthur DANJOU Date: Fri, 13 Feb 2026 16:33:20 +0100 Subject: [PATCH] Enhance seasonality note (mention summer peaks/winter troughs) and replace zoo::rollmean with base filter (remove library(zoo)) in TD2.Rmd --- M2/Time Series/TD2.Rmd | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/M2/Time Series/TD2.Rmd b/M2/Time Series/TD2.Rmd index f8a35ec..be8c2cd 100644 --- a/M2/Time Series/TD2.Rmd +++ b/M2/Time Series/TD2.Rmd @@ -32,14 +32,12 @@ boxplot( ) ``` -Il y a en effet une saisonnalité dans les données, avec des pics réguliers tous les 12 mois. Cela suggère que les passagers aériens ont tendance à augmenter à certaines périodes de l'année, probablement en raison de vacances ou d'autres facteurs saisonniers. +Il y a en effet une saisonnalité dans les données, avec des pics réguliers tous les 12 mois. Cela suggère que les passagers aériens ont tendance à augmenter à certaines périodes de l'année, probablement en raison de vacances ou d'autres facteurs saisonniers. Le boxplot confirme cette saisonnalité, montrant des variations significatives entre les mois, avec des pics plus élevés en été (juin, juillet, août) et des creux en hiver (décembre, janvier). ## 3. Moyenne mobile ```{r} -library(zoo) - -ma <- rollmean(AirPassengers, k = 12, fill = NA) +ma <- filter(AirPassengers, rep(1/12, 12)) plot( AirPassengers, @@ -102,4 +100,6 @@ print(kpss_test_result) adf_test_result <- adf.test(final_diff) print(adf_test_result) -``` \ No newline at end of file +``` + +Le test KPSS indique que la série différenciée est stationnaire (p-value > 0.05), tandis que le test ADF confirme également la stationnarité (p-value < 0.05). Ainsi, après les différenciations, la série semble être stationnaire. \ No newline at end of file