set_pop_up | R Documentation |
Modify the pop_up of 'leaflet' map's analysis.
set_pop_up(map, popup = NULL, popupRonds = NULL)
map |
objet leaflet. |
popup |
vecteur de caracteres (character). Peut etre du HTML pour mettre en forme le texte. Par defaut a NULL. |
popupRonds |
vecteur de caracteres (character). Peut etre du HTML pour mettre en forme le texte. Par defaut a NULL. |
Le nouveau texte pour le pop-up peut etre du contenu HTML. Par exemple : "<b> <font color=#2B3E50>Greater City of Paris</font> </b><br><b><font color=#2B3E50>PART : </font></b><b> <font color=#2B3E50>21,2</font></b>" Attention : conserver le meme ordre des pop-up dans le vecteur que celui des donnees pour que les valeurs correspondent bien a l'analyse.
Ne fonctionne que pour les ronds proportionnels, les analyses en classes et les typologies.
Pour supprimer les pop-up, laisser le parametre a NULL.
Retourne un objet de type leaflet.
leaflet_ronds, leaflet_classes,
leaflet_ronds_classes, leaflet_classes_ronds,
leaflet_typo
data("depm") data("donnees_monoloc") # Ronds proportionnels sur une analyse en classes map <- leaflet_ronds_classes(data = donnees_monoloc[donnees_monoloc$REG=="93",], fondMaille = depm[depm$REG=="93",], idData = "COD_DEP", varVolume = "POP_2015", varRatio = "VAR_AN_MOY", nbClasses = 4) new_popup <- c(paste0("<b><font color=#2B3E50>Bouches-du-Rhone</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50>2 016,6</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,4</font>"), paste0("<b><font color=#2B3E50>Alpes-Maritimes</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50>1 082,4</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,1</font>"), paste0("<b><font color=#2B3E50>Var</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50>1 048,7</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,8</font>"), paste0("<b><font color=#2B3E50>Vaucluse</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50> 557,5</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,6</font>"), paste0("<b><font color=#2B3E50>Alpes-de-Haute-Provence</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50> 161,8</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,2</font>"), paste0("<b><font color=#2B3E50>Hautes-Alpes</font></b><br>", "<font color=#2B3E50>Population 2015 : </font><font color=#2B3E50> 140,9</font><br>", "<font color=#2B3E50>Variation annuelle moyenne : </font><font color=#2B3E50>0,6</font>")) map <- set_pop_up(map = map, popupRonds = new_popup) map
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.