diff --git a/R/creer_carte_2_7.R b/R/creer_carte_2_7.R
index 262cd5a8b89b69570975d04e80a0725e032d5121..4aa04eb6c072da12c852d0b5e810de8a3de3600d 100644
--- a/R/creer_carte_2_7.R
+++ b/R/creer_carte_2_7.R
@@ -53,7 +53,8 @@ creer_carte_2_7 <- function(millesime_obs_artif= NULL, code_reg = NULL) {
 
   fond_cartographique <- mapfactory::fond_carto(nom_reg = nom_region)
   # bins  <- stats::quantile(data$valeur,probs = c(0,0.1, 0.25, 0.5,0.75,0.9,1),na.rm=TRUE)
-  bins  <- stats::quantile(data$valeur,probs = c(0,0.2, 0.4, 0.6,0.8,1),na.rm=TRUE)
+  # bins  <- stats::quantile(data$valeur,probs = c(0,0.2, 0.4, 0.6,0.8,1),na.rm=TRUE)
+  bins <- stats::quantile(data$valeur,probs = c(0, 0.25, 0.50, 0.75, 1), na.rm=TRUE)
 
 
   carte_2_7 <- mapfactory::creer_carte_communes(data = data,