Résumé du chapitre 2

Cartes interactives avec leaflet en R

Rich Majerus

Vice President of Strategy & Planning, Queens University of Charlotte

Où en étions‑nous ?

leaflet() %>% 
    addProviderTiles("CartoDB") %>% 
    addMarkers(lng = dc_hq$lon, lat = dc_hq$lat, popup = dc_hq$hq)

Carte finale du chapitre 1

Nettoyer la carte de base

m <- m %>% 
    setView(lat = 50.881363, 
            lng = 4.717863,
            zoom = 5)

Exemple ClearBounds() 1

# Restaurer la vue d'après
# les données affichées sur la carte
m  %>%
    clearBounds()

Exemple ClearBounds() 2

Nettoyer la carte de base

# Restaurer la vue d'après
# les données affichées sur la carte
m  %>%
    clearBounds()

Exemple clearMarkers() 1

# Supprimer les marqueurs
m  %>%
    clearBounds() %>% 
    clearMarkers()

Exemple clearMarkers() 2

IPEDS

Integrated Postsecondary Education Data System (IPEDS)
Administré par le National Center for Education Statistics (NCES)
Données de tous les établissements participant aux aides fédérales aux étudiants
- colleges
- universities
- établissements techniques et professionnels

Notre jeu de données IPEDS

> glimpse(ipeds)

Observations: 3,146
Variables: 5
$ name         <chr> "A T Still University of Health Sciences",...
$ lng          <dbl> -92.58918, -99.70954, -83.52828, -93.29968, ...
$ lat          <dbl> 40.19365, 32.46915, 31.48189, 44.85621, 29.65008, ...
$ state        <chr> "MO", "TX", "GA", "MN", "FL", "CA", "CA", "CA",... 
$ sector_label <chr> "Private", "Private", "Public", "For-Profit", ...

Notre jeu de données IPEDS

ipeds %>% group_by(state) %>% count %>% arrange(desc(n))

# A tibble: 56 x 2
# Groups:   state [56]
   state     n
   <chr> <int>
 1    CA   286
 2    NY   239
 3    PA   164
 4    FL   160
 5    TX   157

Objectif du chapitre 2

Filtrer les données sur les colleges de Californie
Cartographier tous les colleges en Californie
Utiliser des marqueurs circulaires plutôt que des épingles
Colorer les marqueurs par secteur

Colleges de Californie par secteur

Passons à la pratique !

Cartes interactives avec leaflet en R