From bf65724f36975bc46c9bc72807c03e41b9b41eb9 Mon Sep 17 00:00:00 2001 From: clerousset Date: Wed, 17 Jun 2026 14:31:35 +0000 Subject: [PATCH] ajout date' --- 01_R_Insee/Fiche-personnaliser-R.qmd | 3 +++ 01_R_Insee/Fiche_installer_packages.qmd | 4 ++++ 01_R_Insee/Fiche_utiliser_Rstudio_AUSv3.qmd | 4 ++++ 01_R_Insee/Fiche_utiliser_ressources.qmd | 4 ++++ 01_R_Insee/Fiche_utiliser_utilitR.qmd | 4 ++++ 01_R_Insee/Travail_avec_R_Insee.qmd | 4 ++++ 02_Bonnes_pratiques/01-qualite-code.qmd | 4 ++++ 02_Bonnes_pratiques/02-nommage.qmd | 4 ++++ 02_Bonnes_pratiques/03-syntaxe.qmd | 4 ++++ 02_Bonnes_pratiques/04-organisation.qmd | 4 ++++ .../Fiche_analyse_de_donnees.qmd | 4 ++++ 03_Fiches_thematiques/Fiche_arrow.qmd | 4 ++++ rproject.toml | 1 + rv.lock | 16 ++++++++++++++++ utils/derniere_modif.R | 7 +++++++ 15 files changed, 71 insertions(+) create mode 100644 utils/derniere_modif.R diff --git a/01_R_Insee/Fiche-personnaliser-R.qmd b/01_R_Insee/Fiche-personnaliser-R.qmd index 81f00d11..b974ee94 100644 --- a/01_R_Insee/Fiche-personnaliser-R.qmd +++ b/01_R_Insee/Fiche-personnaliser-R.qmd @@ -1,5 +1,8 @@ # Personnaliser la configuration de `R` {#personnaliser} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` L'agent souhaite personnaliser sa configuration de `R`. Cette personnalisation consiste à définir certaines actions ou valeurs qui seront effectuées automatiquement à l'ouverture d'une session `R`. ::: {.callout-important} diff --git a/01_R_Insee/Fiche_installer_packages.qmd b/01_R_Insee/Fiche_installer_packages.qmd index fdf11dd9..9edb8534 100644 --- a/01_R_Insee/Fiche_installer_packages.qmd +++ b/01_R_Insee/Fiche_installer_packages.qmd @@ -1,5 +1,9 @@ # Utiliser des _packages_ `R` {#utiliser-packages} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ::: {.callout-important} ## Tâche concernée et recommandation diff --git a/01_R_Insee/Fiche_utiliser_Rstudio_AUSv3.qmd b/01_R_Insee/Fiche_utiliser_Rstudio_AUSv3.qmd index fa08a050..62413473 100644 --- a/01_R_Insee/Fiche_utiliser_Rstudio_AUSv3.qmd +++ b/01_R_Insee/Fiche_utiliser_Rstudio_AUSv3.qmd @@ -1,5 +1,9 @@ # Utiliser RStudio sur l'environnement AUSv3 {#AUSv3} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ::: {.callout-important} ## Tâche concernée et recommandation diff --git a/01_R_Insee/Fiche_utiliser_ressources.qmd b/01_R_Insee/Fiche_utiliser_ressources.qmd index 0a38d0e7..aa3ee98e 100644 --- a/01_R_Insee/Fiche_utiliser_ressources.qmd +++ b/01_R_Insee/Fiche_utiliser_ressources.qmd @@ -1,5 +1,9 @@ # Superviser sa session `R` {#superviser-ressources} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ::: {.callout-important} ## Tâche concernée et recommandation diff --git a/01_R_Insee/Fiche_utiliser_utilitR.qmd b/01_R_Insee/Fiche_utiliser_utilitR.qmd index 1bc56864..6340d558 100644 --- a/01_R_Insee/Fiche_utiliser_utilitR.qmd +++ b/01_R_Insee/Fiche_utiliser_utilitR.qmd @@ -1,5 +1,9 @@ # Comment utiliser la documentation `utilitR` {#presentation-utilitr} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Contenu de la documentation **Cette documentation vise à aider les agents à réaliser des traitements statistiques usuels avec `R` et à produire des sorties (graphiques, cartes, documents).** Cette documentation présente succinctement les outils les plus adaptés à ces tâches, et oriente les agents vers les ressources documentaires pertinentes. En revanche, elle n'aborde pas les outils les plus avancés, notamment ceux utilisés dans un cadre de développement logiciel. diff --git a/01_R_Insee/Travail_avec_R_Insee.qmd b/01_R_Insee/Travail_avec_R_Insee.qmd index 65300473..c5b47b9d 100644 --- a/01_R_Insee/Travail_avec_R_Insee.qmd +++ b/01_R_Insee/Travail_avec_R_Insee.qmd @@ -1,5 +1,9 @@ # Comment travailler avec R à l'Insee ? +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Démarrage rapide de `R` à l'Insee - où clique-t-on pour accéder à Rstudio? Description rapide des environnements: local, AUS, PF innovation. diff --git a/02_Bonnes_pratiques/01-qualite-code.qmd b/02_Bonnes_pratiques/01-qualite-code.qmd index 198ca5ff..209d9306 100644 --- a/02_Bonnes_pratiques/01-qualite-code.qmd +++ b/02_Bonnes_pratiques/01-qualite-code.qmd @@ -1,5 +1,9 @@ # Qualité du code {#code-quality} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ::: {.callout-important} ## Tâche concernée et recommandation diff --git a/02_Bonnes_pratiques/02-nommage.qmd b/02_Bonnes_pratiques/02-nommage.qmd index 6b9616ee..22cbf6dd 100644 --- a/02_Bonnes_pratiques/02-nommage.qmd +++ b/02_Bonnes_pratiques/02-nommage.qmd @@ -1,5 +1,9 @@ # Nommer les objets {.nommage} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + Un code écrit avec des noms de variables et de fonctions explicites est autant, voire plus, informatif que les commentaires qui l’accompagnent. C'est pourquoi il est essentiel de respecter des conventions pour le choix des noms des objets afin d'assurer la lisibilité des programmes. Sur ce point, il est important de rappeler que **`R` est un langage sensible à la casse**, ce qui signifie que `variable` et `Variable` renvoient à deux objets différents. Les fonctions de base `R` utilisent des points dans les noms de fonctions ( `contrib.url()` par exemple) ou les noms de classes (`data.frame`). Il est néanmoins mieux de réserver les points uniquement aux objets de classe `S3` sous la forme `fonction.classe` diff --git a/02_Bonnes_pratiques/03-syntaxe.qmd b/02_Bonnes_pratiques/03-syntaxe.qmd index 902ced66..c8f49fe7 100644 --- a/02_Bonnes_pratiques/03-syntaxe.qmd +++ b/02_Bonnes_pratiques/03-syntaxe.qmd @@ -1,5 +1,9 @@ # Rédiger un script `R` +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Longueur des lignes **La longueur maximale recommandée d'une ligne est 80 caractères**. Il faut penser à retourner à la ligne pour que le code soit lisible. Par exemple, diff --git a/02_Bonnes_pratiques/04-organisation.qmd b/02_Bonnes_pratiques/04-organisation.qmd index df70ece4..7e611b38 100644 --- a/02_Bonnes_pratiques/04-organisation.qmd +++ b/02_Bonnes_pratiques/04-organisation.qmd @@ -1,5 +1,9 @@ # Comment organiser un code `R` +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Lister les dépendances Il est important de mettre en évidence dans le code la liste des *packages* utilisés, la définition des fonctions (si elles sont utilisées plusieurs fois dans le script) et la définition des paramètres. Cela permet de bien visualiser les *packages* chargés pour un script ainsi que l'ensemble des paramètres à éventuellement modifier/mettre à jour. diff --git a/03_Fiches_thematiques/Fiche_analyse_de_donnees.qmd b/03_Fiches_thematiques/Fiche_analyse_de_donnees.qmd index ebd9dbc3..d3f74f9d 100644 --- a/03_Fiches_thematiques/Fiche_analyse_de_donnees.qmd +++ b/03_Fiches_thematiques/Fiche_analyse_de_donnees.qmd @@ -1,5 +1,9 @@ # L'analyse de données (ACP, ACM, ACF...) {#acp} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Tâches concernées et recommandations Vous souhaitez appliquer les méthodes classiques d'analyse de données, notamment l'analyse en composantes principales, l'analyse des correspondances multiples, l'analyse factorielle des correspondances... diff --git a/03_Fiches_thematiques/Fiche_arrow.qmd b/03_Fiches_thematiques/Fiche_arrow.qmd index 625a3aee..ef53a7c6 100644 --- a/03_Fiches_thematiques/Fiche_arrow.qmd +++ b/03_Fiches_thematiques/Fiche_arrow.qmd @@ -1,5 +1,9 @@ # Manipuler des données avec `arrow` {#arrow} +```{r, echo=FALSE, results='asis'} +source(file.path(here::here(),"utils/derniere_modif.R")) +``` + ## Tâches concernées et recommandations L'utilisateur souhaite manipuler des données structurées sous forme de `data.frame` par le biais de l'écosystème `Arrow` (sélectionner des variables, sélectionner des observations, créer des variables, joindre des tables). diff --git a/rproject.toml b/rproject.toml index ce47975d..33ba3483 100644 --- a/rproject.toml +++ b/rproject.toml @@ -48,4 +48,5 @@ dependencies = [ { name = "melodi", git = "https://github.com/inseefrlab/melodi", branch = "main" }, { name = "insee", git = "https://github.com/pyr-opendatafr/R-Insee-Data", branch = "master" }, { name = "OECD", git = "https://github.com/expersso/OECD", branch = "master" }, + "here", ] diff --git a/rv.lock b/rv.lock index 5bc250bd..8ee2300f 100644 --- a/rv.lock +++ b/rv.lock @@ -915,6 +915,15 @@ dependencies = [ "cpp11", ] +[[packages]] +name = "here" +version = "1.0.2" +source = { repository = "https://packagemanager.posit.co/cran/latest" } +force_source = false +dependencies = [ + { name = "rprojroot", requirement = "(>= 2.1.0)" }, +] + [[packages]] name = "highr" version = "0.12" @@ -1671,6 +1680,13 @@ dependencies = [ { name = "yaml", requirement = "(>= 2.1.19)" }, ] +[[packages]] +name = "rprojroot" +version = "2.1.1" +source = { repository = "https://packagemanager.posit.co/cran/latest" } +force_source = false +dependencies = [] + [[packages]] name = "rsdmx" version = "0.6-5" diff --git a/utils/derniere_modif.R b/utils/derniere_modif.R new file mode 100644 index 00000000..ee8bbd60 --- /dev/null +++ b/utils/derniere_modif.R @@ -0,0 +1,7 @@ +# malhereusement nécessaire car knitr::current_input renvoit faussement .rmarkdown +nom_fichier <- sub("rmarkdown", "qmd", knitr::current_input(dir=FALSE)) +last_date <- system(paste0("git log -1 --format=%as -- ", nom_fichier), intern = TRUE) +last_date <- format(as.Date(last_date), format = "%d/%m/%Y") +if(length(last_date) > 0) { + cat("**Dernière modification :** ", last_date) +} \ No newline at end of file