Memetakan Semua Perguruan Tinggi
Mari kita terus menambahkan lapisan dan menambahkan perguruan tinggi for-profit ke peta leaflet yang disimpan dalam objek m3.
Setelah Anda melakukan print() pada peta m3 dengan perguruan tinggi negeri (public), swasta (private), dan for-profit sebagai lapisan masing-masing, cobalah menghapus ketiga lapisan tersebut dan menambahkannya kembali ke peta dengan urutan yang berbeda.
Sektor perguruan tinggi yang berbeda akan ditambahkan kembali ke peta sebagai lapisan sesuai urutan yang Anda tentukan (yaitu, sektor terakhir yang Anda pilih akan berada di paling atas).
Palet warna pal dan peta m3 dengan perguruan tinggi negeri dan swasta telah dimuat untuk Anda.
Latihan ini merupakan bagian dari kursus
Peta Interaktif dengan leaflet di R
Instruksi latihan
- Saring data ipeds untuk membuat data frame berisi hanya perguruan tinggi for-profit dan tetapkan ke
profit. - Buat peta
leafletyang memuat perguruan tinggi negeri (public), swasta (private), dan for-profit. - Gunakan fungsi
addLayersControl()dan argumenoverlayGroupsagar pengguna dapat mengaktifkan/nonaktifkan ketiga sektor perguruan tinggi tersebut. - Pusatkan peta di tengah Amerika Serikat dan atur tingkat zoom ke 4.
Latihan interaktif langsung praktik
Cobalah latihan ini dengan melengkapi kode contoh ini.
# Create data frame called profit with only For-Profit colleges
___ <- filter(ipeds, sector_label == "For-Profit")
# Add For-Profit colleges to `m3` as a new layer
m3 <- m3 %>%
addCircleMarkers(data = ___, radius = 2, label = ~htmlEscape(name),
color = ~pal(sector_label), group = "___") %>%
addLayersControl(overlayGroups = c("Public", "Private", "___"))
# Center the map on the middle of the US with a zoom of 4
m4 <- m3 %>%
___(lat = 39.8282, lng = -98.5795, zoom = 4)
m4