diff --git a/DESCRIPTION b/DESCRIPTION index 3dc2e5fd96aace71d21f18df55f479a3ac9e3e8d..939f2fe3463511e14b9d3ca68f2bf6e71ab02411 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -30,7 +30,6 @@ Imports: magrittr, mapfactory (>= 0.0.0.9000), reactable, - rmarkdown, scales, sf, stats, @@ -40,6 +39,7 @@ Imports: tricky, utils Suggests: + rmarkdown, testthat (>= 3.0.0) VignetteBuilder: knitr diff --git a/R/creer_carte_3_2.R b/R/creer_carte_3_2.R index c2c21df49488ebc6d148013f7137d6b4c018bc8a..5db43634bf80766db913775b1d21001e58e345b3 100644 --- a/R/creer_carte_3_2.R +++ b/R/creer_carte_3_2.R @@ -79,8 +79,8 @@ creer_carte_3_2 <- function(millesime_etalement_urbain, data = data, code_region = code_reg, carto = fond_carte, - palette = "pal_gouv_div1", - inverse = TRUE, + palette = "pal_gouv_h", + inverse = FALSE, indicateur = .data$indicateur_etalement_urbain, titre = glue::glue("Etalement urbain par commune entre {millesime_etalement_urbain_debut} et {millesime_etalement_urbain}"), bas_de_page = glue::glue("Source : Cerema Fichiers fonciers / Insee RP {millesime_population}"),