Creation de la carte 1 du chapitre 4 (Part du coût du terrain dans le coût total du projet pour les départements de la France métropolitaine et les DROM)

Mise en forme de la carte 1 du chapitre 4 au format html.

creer_carte_4_1(data, annee, titre, palette, inverse, na_label)

Arguments

data

on charge le dataset itinial tab_result

annee

Le millesime renseigné par l'utilisateur.

titre

une chaine de caractère si vous voulez ajouter un titre spécifique.

palette

une palette parmi celles du package gouvdown, cf gouvdown::gouv_palettes().

inverse

valeur FALSE ou TRUE pour indiquer la direction des couleurs de la palette.

na_label

intitulé des valeurs à NA.

Value

Une carte intéractive mise en forme au format html.

Examples

indicateurs_eptb <- lire_eptb_exemple()
creer_carte_4_1(
data = indicateurs_eptb,
annee = 2023,
titre = "Part du coût du terrain dans le coût total du projet",
palette = "pal_gouv_o",
inverse = TRUE,
na_label = "Valeur non communiquée"
)
#> $viz
#> 
#> $tab_xls
#> # A tibble: 96 × 7
#>    TypeZone     Zone      CodeZone millesime part_prix_terrain_co…¹ valeur q    
#>    <fct>        <fct>     <fct>    <fct>                      <dbl> <chr>  <fct>
#>  1 Départements Ain       01       2023                        29.8 30%    De 2…
#>  2 Départements Aisne     02       2023                        28   28%    De 2…
#>  3 Départements Allier    03       2023                        30.5 30%    De 3…
#>  4 Départements Alpes-Ma… 06       2023                        29.8 30%    De 2…
#>  5 Départements Alpes-de… 04       2023                        29.8 30%    De 2…
#>  6 Départements Ardennes  08       2023                        29.8 30%    De 2…
#>  7 Départements Ardèche   07       2023                        30.4 30%    De 3…
#>  8 Départements Ariège    09       2023                        31.9 32%    De 3…
#>  9 Départements Aube      10       2023                        29.8 30%    De 2…
#> 10 Départements Aude      11       2023                        30.9 31%    De 3…
#> # ℹ 86 more rows
#> # ℹ abbreviated name: ¹​part_prix_terrain_cout_projet
#> 
#> $meta
#>      onglet                                                titre
#> 1 carte_4_1 Part du coût du terrain dans le coût total du projet
#>