diff --git a/R/creer_graphe_3_1.R b/R/creer_graphe_3_1.R
index 3cae1f506be7ac5a219c494ca0ba44b2b27e73c7..6c74c4d529a34e34df88a4d7f193cbb93be24546 100644
--- a/R/creer_graphe_3_1.R
+++ b/R/creer_graphe_3_1.R
@@ -104,7 +104,7 @@ creer_graphe_3_1 <- function(millesime_stock_artif = NULL,
       expand = c(0,0)
     ) +
     ggplot2::labs(
-      title = "Taux de croissance compar\u00e9s des <span style = \'color:#FF8D7E\'>cadastr\u00e9es consomm\u00e9es</span> <br>et de la <span style = \'color:#5770BE\'>population municipale</span>",
+      title = "Taux de croissance compar\u00e9s des surfaces <span style = \'color:#FF8D7E\'>cadastr\u00e9es consomm\u00e9es</span> <br>et de la <span style = \'color:#5770BE\'>population municipale</span>",
       subtitle = glue::glue("Entre {millesime_debut} et {millesime_stock_artif} (en %)"),
       caption = glue::glue("Source : Cerema Fichiers fonciers / Insee RP {millesime_population}"),
       x = NULL, y = NULL
diff --git a/R/creer_graphe_5_1.R b/R/creer_graphe_5_1.R
index 277d8995cbd459c76a7dbab201d342bd1c39b1c2..a1c372df036a34a808aa23074900003bad5fe193 100644
--- a/R/creer_graphe_5_1.R
+++ b/R/creer_graphe_5_1.R
@@ -46,7 +46,6 @@ creer_graphe_5_1 <- function(millesime_stock_artif,code_reg) {
                   .data$date %in% c(millesime_stock_artif,millesime_reference)) %>%
 
     dplyr::select(.data$TypeZone,.data$Zone,.data$CodeZone,.data$date,.data$surface_artificialisee) %>%
-    dplyr::mutate(surface_artificialisee = .data$surface_artificialisee / 10000) %>%
     dplyr::mutate(date = dplyr::case_when(
       .data$date == millesime_reference ~ "stock_mill_debut",
       .data$date == millesime_stock_artif ~ "stock_mill_fin",