Skip to content
Snippets Groups Projects
Commit bca2b6d9 authored by Juliette Engelaere-Lefebvre's avatar Juliette Engelaere-Lefebvre
Browse files

Mise à jour 2024 des OPAH

parent 683b5549
Branches
No related tags found
No related merge requests found
Pipeline #495692 passed
......@@ -5,7 +5,7 @@ date: "`r format(Sys.Date(), '%d/%m/%Y')`"
output: html_document
params:
annee: "2024" # annee de la carte com et epci utilisée
sgbd: FALSE # mettre à TRUE pour almimenter le SGBD quand traitements OKs
sgbd: TRUE # mettre à TRUE pour almimenter le SGBD quand traitements OKs
---
```{r setup, include=FALSE, message = FALSE}
......@@ -87,8 +87,8 @@ opah_1 <- opah_0 %>%
rename_with(.fn = ~ gsub("var_._|_$", "", .x) %>%
gsub("_de_|_du_|_des_", "_", .) %>%
gsub("objectifs", "objectif", .)) %>%
# on redresse le type d'OPAH de Mayenne Communaute saisi comme OPAH-RU alors que plusieurs volets
mutate(types_programme = if_else(identifiant == "053OPA014", "OPAH", as.character(types_programme)) %>% as.factor) %>%
# on redresse le type d'OPAH de Mayenne Communaute et du pays de la chataigneraie saisis comme OPAH-RU alors que plusieurs volets
mutate(types_programme = if_else(identifiant %in% c("053OPA014", "085OPA043"), "OPAH", as.character(types_programme)) %>% as.factor) %>%
rename(dep = departement,
prog_com_infracom = commune_prog_communaux_ou_infra_communaux,
territoire_gestion = territoires_gestion,
......
This diff is collapsed.
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment