Kom igångKom igång gratis

Kartlägg offentliga högskolor

Vi kan lägga till varje sektor på kartan som ett lager, vilket ger användarna möjlighet att välja vilka sektorer som visas. För att göra detta använder vi ett nytt argument i funktionen addCircleMarkers() – nämligen group.

leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = public, 
                         label = ~htmlEscape(name), 
                         group = "Public")

Vi integrerar ytterligare en funktion från biblioteket htmltools i vår karta. Genom att omsluta etiketterna med funktionen htmlEscape() saneras tecken som annars kan tolkas som HTML. Det förhindrar att några av högskolornas namn visas med oavsiktlig formatering.

Färgpaletten pal som vi skapade i kapitel 2 har redan laddats in.

Den här övningen är en del av kursen

Interaktiva kartor med leaflet i R

Visa kurs

Övningsinstruktioner

  • Ladda paketet htmltools.
  • Filtrera datamängden ipeds för att skapa en dataram med endast offentliga högskolor.
  • Skapa en leaflet-karta över offentliga högskolor.
  • Lägg till argumentet group i addCircleMarkers().

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# Load the htmltools package
___

# Create data frame called public with only public colleges
public <- ___(ipeds, sector_label == "Public")  

# Create a leaflet map of public colleges called m3 
m3 <- leaflet() %>% 
        addProviderTiles("CartoDB") %>% 
        addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
                         color = ~pal(sector_label), ___ = "Public")

m3
Redigera och kör kod