composeur_carte( .data = indicateurs_rpls, indicateur = "En QPV", titre = "Part des logements en QPV dans le parc social au 1er janvier 2018", soustitre = "En %", parc_recent = T, basdepage = NULL, filtre_zero = T, na_recode = "Pas de QPV" )
p4 <- graphique_comparaison_parc_recent( .data = df, indicateur = "En QPV", titre = "Part des logements sociaux en QPV", caption = caption ) p4
graph_repartition_par_date( .data = rpls_par_date, indicateur = qpv, titre = "Répartition des logements en QPV et hors QPV" )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.