ANCT/CDV.Rmd

+---
+title: "CDV"
+author: "christine.gallais-jouadet"
+date: "`r Sys.Date()`"
+output: html_document
+---
+
+```{r setup, include=FALSE}
+knitr::opts_chunk$set(echo = TRUE)
+
+#remotes::install_github("MaelTheuliere/COGiter")
+library(COGiter)
+#remotes::install_gitlab('dreal-pdl/csd/collectr', host="gitlab-forge.din.developpement-durable.gouv.fr")
+library(collectr)
+#remotes::install_gitlab('dreal-pdl/csd/datalibaba', host = "gitlab-forge.din.developpement-durable.gouv.fr")
+library(datalibaba)
+library(DBI)
+library(dplyr)
+#devtools::install_github("hadley/emo")
+library(emo)
+library(httr)
+library(readxl)
+library(RPostgres)
+library(sf)
+
+knitr::opts_chunk$set(echo=TRUE, message = FALSE, warning = FALSE, error = FALSE, cache=TRUE, eval=FALSE)
+
+library(tidyverse)
+
+```
+# Chargement des données Action coeur de ville sur datagouv
+ 
+```{r}
+acv <- read_delim(file = "https://static.data.gouv.fr/resources/programme-action-coeur-de-ville/20241205-103920/liste-acv-com2024-20241202.csv")
+```
+# Chargement SGBD
+```{r}
+datalibaba::poster_data(data = acv,
+                        table = "n_acv_000",
+                        schema = "sial_zonages_habitat",
+                        db = "production",
+                        overwrite = TRUE,
+                        pk = "insee_com",
+                        user = "does")
+```
+