From 0613c724a35700654b419890b409c4b2dad30657 Mon Sep 17 00:00:00 2001
From: LE DURAND Matteo <matteo.le-durand@developpement-durable.gouv.fr>
Date: Thu, 13 Mar 2025 10:12:25 +0100
Subject: [PATCH] les groupes sont dans les fichiers d'extraction maintenants
---
global.R | 9 ++-------
1 file changed, 2 insertions(+), 7 deletions(-)
diff --git a/global.R b/global.R
index d35e2cb..a852564 100644
--- a/global.R
+++ b/global.R
@@ -28,12 +28,7 @@ load("date_MAJ.RData")
all_data <- bind_rows(all_data_gitlab, all_data_forge, combined_data)
all_data$updated_at <- as.POSIXct(all_data$updated_at, format = ("%Y-%m-%dT%H:%M:%S"))
-all_data <- all_data %>% mutate(message = paste0(type,sep = " : ",message),
- categorie = case_when(
- str_detect(project_name, "parcours_r") ~ "r-formation",
- str_detect(project_name, "spyrales") ~ "spyrales",
- TRUE ~ "autre"
- ))
+all_data <- all_data %>% mutate(message = paste0(type,sep = " : ",message))
# transformation author ----
all_data$author <- all_data$author %>%
tolower() %>%
@@ -51,7 +46,7 @@ traduction <- c(
"WikiPage::Meta" = "Documentation",
"joined" = "Gestion de projet" ,
"WorkItem" = "Gestion de projet" ,
- "MergeRequest" = "Code" ,
+ "MergeRequest" = "Code" , # ajouter un "item" merge ?
"Milestone" = "Gestion de projet"
)
all_data <- all_data %>% dplyr::mutate(re_code = dplyr::recode(type , !!!traduction))
--
GitLab