From 79bbe2fe6711558ed675651769252be163c27e24 Mon Sep 17 00:00:00 2001
From: Juliette Engelaere-Lefebvre
 <juliette.engelaere@developpement-durable.gouv.fr>
Date: Wed, 17 Apr 2024 22:21:32 +0200
Subject: [PATCH] =?UTF-8?q?review=20#83=20source=20RPLS=20doc=20:=20supres?=
 =?UTF-8?q?sion=20des=20lignes=20de=20doc=20de=20la=20fonction=20dataprep?=
 =?UTF-8?q?=20all=20devenues=20inadapt=C3=A9es?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/cogifier_en_masse.R | 12 +++++++++++-
 R/dataprep_all.R      | 17 +++++------------
 2 files changed, 16 insertions(+), 13 deletions(-)

diff --git a/R/cogifier_en_masse.R b/R/cogifier_en_masse.R
index 137fea5..7379eb8 100644
--- a/R/cogifier_en_masse.R
+++ b/R/cogifier_en_masse.R
@@ -27,4 +27,14 @@ map(.x = scripts_ind, .f = source)
 # > scripts_ind[10]
 # [1] "data-raw/indicateur_fichier_foncier_etalement_urbain.R"
 
-      
\ No newline at end of file
+# Manuellement, faire tourner les scripts qui aboutissent à de la donnée COGifiée directement
+# - EnR de réseau
+# - déchets ADEME
+# - SICLOP
+# - RPLS
+
+## Pour les trouver : 
+# utiliser menu Edit / Find in files... / Find: "cogifiee_ / Search in: ~/sgbd_datamart/data-raw / 
+#                                         Search these files: Custom Filter / chargement_*.R, 
+# puis cliquer sur 'find' pour rechercher les noms de tables postées qui commence par cogifiee_ dans les scripts de chargement
+
diff --git a/R/dataprep_all.R b/R/dataprep_all.R
index 06be722..2870b60 100644
--- a/R/dataprep_all.R
+++ b/R/dataprep_all.R
@@ -1,13 +1,12 @@
+# Fonction pour la source RPLS adaptée de puis https://gitlab.com/rdes_dreal/propre.rpls/-/blob/master/R/dataprep.R?ref_type=heads
+
 #' Phase de datapreparation pour la publication
 #'
-#' @description Consolidation des indicateurs aux differentes échelles et creation d'un champ de filtrage des territoires pour les illustrations.
+#' @description Consolidation des indicateurs aux differentes échelles 
 #'
-#' @param nom_reg Le nom de la region au format texte.
-#' @param choix_epci Le parametre utilisateur de détail par epci au format texte : "1- Tous les EPCI de la zone" ou "2- Liste d EPCI à saisir".
-#' @param epci_list Le vecteur des codes epci de reference, defini dans les parametres.
 #' @param test TRUE si on souhaite tester dataprep() sur 100 communes choisies au hasard.
 #'
-#' @return Un dataframe d'indicateurs : une ligne par entite geographique et millesime, le champ Zone_ref permet de filtrer les territoires pour ne conserver que ceux a inclure dans les illustrations.
+#' @return Un dataframe d'indicateurs : une ligne par entite geographique et millesime
 #' @importFrom COGiter cogifier ajouter_zonage
 #' @importFrom dplyr select full_join mutate vars starts_with mutate filter case_when across pull group_by ungroup lag arrange
 #' @importFrom forcats fct_relevel
@@ -15,13 +14,7 @@
 #' @importFrom tidyr replace_na expand_grid
 #' @export
 #'
-#' @examples
-#' \dontrun{
-#' indicateurs_rpls <- dataprep(nom_reg = "Pays de la Loire", choix_epci ="2- Liste d EPCI a saisir",
-#'                              epci_list = c("244400404", "244400644")) %>%
-#'   dplyr::filter(Zone_ref)
-#'   }
-#'
+
 dataprep_all <- function(test = FALSE) {
   
   if (test) {
-- 
GitLab