Mulai sekarangMulai gratis

Memetakan Perguruan Tinggi Negeri

Kita dapat menambahkan setiap sektor ke peta sebagai layer sehingga pengguna dapat memilih sektor mana yang ditampilkan. Untuk melakukan ini, kita akan menggunakan argumen baru pada fungsi addCircleMarkers(), yaitu group.

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

Kita akan mengintegrasikan fitur lain ke dalam peta dari pustaka htmltools. Membungkus label dengan fungsi htmlEscape() akan menyanitasi karakter yang mungkin ditafsirkan sebagai HTML. Ini akan mencegah nama perguruan tinggi muncul dengan pemformatan yang tidak diinginkan.

Palet warna pal yang kita buat pada Bab 2 telah dimuat untuk Anda.

Latihan ini merupakan bagian dari kursus

Peta Interaktif dengan leaflet di R

Lihat Kursus

Instruksi latihan

  • Muat paket htmltools.
  • Saring data ipeds untuk membuat data frame yang hanya berisi perguruan tinggi negeri (public).
  • Buat peta leaflet untuk perguruan tinggi negeri.
  • Tambahkan argumen group ke addCircleMarkers().

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# 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
Edit dan Jalankan Kode