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