oceanis (version 0.8.5)

add_legende: Add a legend on a 'leaflet' map

Description

Add a legend on a 'leaflet' map for proportional circles, chroropleth, typology, proportional and sapphire arrows.

Usage

add_legende_ronds(map, titre = NULL, lng = NULL, lat = NULL, dom = "0", precision = 0,
					zoom = 8)
add_legende_classes(map, titre = NULL, lng = NULL, lat = NULL, typeLegende = 1,
					zoom = 8)
add_legende_typo(map, titre = NULL, lng = NULL, lat = NULL, labels = NULL,
					zoom = 8)
add_legende_joignantes(map, titre = NULL, lng = NULL, lat = NULL, dom = "0",
						precision = 0, zoom = 8)
add_legende_saphirs(map, titre = NULL, lng = NULL, lat = NULL, dom = "0", precision = 0,
					zoom = 8)

Arguments

map

objet leaflet.

titre

chaine de caracteres (character). Titre de la legende des classes. Par defaut a NULL.

lng

valeur numerique (numeric). Longitude (x) de la legende des classes dans le systeme de projection WGS84 (code EPSG 4326). Par defaut a NULL.

lat

valeur numerique (numeric). Latitude (y) de la legende des classes dans le systeme de projection WGS84 (code EPSG 4326). Par defaut a NULL.

dom

chaine de caracteres (character). "0" (par defaut pour la France metropolitaine), "971" (Guadeloupe), "972" (Martinique), "973" (Guyane), "974" (La Reunion) ou "976" (Mayotte). Ce parametre permet de definir le systeme de projection local de la carte.

typeLegende

valeur numerique (numeric). 1 (par defaut) pour une legende litterale, 2 pour une legende en echelle.

labels

vecteur de caracteres (character). Labels personnalises pour la legende de la carte en typologie. Par defaut a NULL.

precision

valeur numerique (numeric). Arrondit les valeurs de la legende des ronds ou des fleches. 0 (par defaut) pour arrondir a l'unite, -1 pour arrondir a la dizaine, -2 a la centaine...

zoom

valeur numerique (numeric). Valeur entre 6 et 10 (8 par defaut). Definit le niveau de zoom de la carte pour un affichage optimal.

Value

Retourne un objet de type leaflet.

Details

Par defaut, lng et lat sont NULL ; la legende est alors positionnee en haut a droite de la carte sauf pour l'analyse en classes ou elle est positionnee en bas.

Les valeurs lng et lat peuvent etre negatives. Une longitude a 0 correspond au meridien de Greenwich.

Pour deplacer la legende, reexecutez la fonction add_legende_xxx en specifiant les parametres lng et lat.

Pour supprimer la legende, reexecutez la fonction add_legende_xxx en laissant les parametres lng et lat a NULL.

Pour supprimer le titre, reexecutez la fonction add_legende_xxx en laissant le parametre titre a NULL.

Concernant la legende des ronds proportionnels, le grand cercle correspond a la valeur max en volume et le petit cercle au tiers de la valeur max.

Idem pour la largeur des fleches joignantes et des fleches saphirs.

Les valeurs de la legende des ronds et des fleches peuvent etre arrondies grace au parametre precision.

Pour la l<U+00E9>gende des cartes en typologie, il est possible de specifier ses propres labels sans avoir besoin de modifier les noms de variables dans la table de donnees.

Si le titre et les valeurs de legende sont trop decales, il faut modifier la valeur du zoom : entre 6 (zoom maximal, niveau commune) et 10 (zoom minimal, niveau France metro)

See Also

coord_legende

leaflet_ronds, leaflet_classes, leaflet_ronds_classes, leaflet_classes_ronds, leaflet_typo,

leaflet_oursins, leaflet_joignantes, leaflet_saphirs

Examples

# NOT RUN {
data("depm")
data("regm")

data("donnees_monoloc")

# Ronds proportionnels sur une analyse en classes
map <- leaflet_classes_ronds(data = donnees_monoloc, fondMaille = depm, idData = "COD_DEP",
varVolume = "POP_2015", varRatio = "VAR_AN_MOY", nbClasses = 4)
map <- add_legende_classes(map = map, titre = "VAR_AN_MOY", lng = 9, lat = 48, zoom = 6)
map <- add_legende_ronds(map = map, titre = "POP_2015", lng = 9, lat = 50, zoom = 6)
# }
# NOT RUN {
 map
# }
# NOT RUN {
data("donnees_biloc")

# Fleches joignantes
map <- leaflet_joignantes(data = donnees_biloc, fondMaille = regm, typeMaille = "REG",
idDataDepart = "REG_DEPART", idDataArrivee = "REG_ARRIVEE",
varFlux = "MIGR", filtreDist = 1000, filtreMajeurs = 3)
map <- add_legende_joignantes(map = map, titre = "MIGR")
# }
# NOT RUN {
 map
# }