Mulai sekarangMulai gratis

Peta dengan Tampilan yang Lebih Sempit

Kita dapat membatasi kemampuan pengguna untuk menggeser (pan) keluar dari fokus peta dengan argumen options pada fungsi leaflet(). Dengan mengatur minZoom dan dragging, kita dapat membuat peta web interaktif yang selalu terfokus pada area tertentu.

leaflet(options = 
        leafletOptions(minZoom = 14, dragging = FALSE))  %>% 
  addProviderTiles("CartoDB")  %>% 
  setView(lng = -73.98575, lat = 40.74856, zoom = 14)

Sebagai alternatif, jika kita ingin pengguna dapat menyeret peta sambil memastikan mereka tidak bergeser terlalu jauh, kita dapat menetapkan batas maksimum peta dengan menentukan dua sudut diagonal dari sebuah persegi panjang.

Anda akan menggunakan dc_hq untuk membuat peta dengan provider tile "CartoDB" yang dipusatkan pada kantor DataCamp di Belgia.

Latihan ini merupakan bagian dari kursus

Peta Interaktif dengan leaflet di R

Lihat Kursus

Instruksi latihan

  • Gunakan tingkat zoom minimum 12.
  • Atur opsi dragging ke TRUE.
  • Gunakan batas maksimum 0,05 derajat desimal dari kantor pusat.

Latihan interaktif langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

leaflet(options = leafletOptions(
                    # Set minZoom and dragging 
                    minZoom = ___, dragging = FALSE))  %>% 
  addProviderTiles("CartoDB")  %>% 
  
  # Set default zoom level 
  setView(lng = dc_hq$lon[2], lat = dc_hq$lat[2], zoom = 14) %>% 
  
  # Set max bounds of map 
  setMaxBounds(lng1 = dc_hq$lon[2] + ___, 
               lat1 = dc_hq$lat[2] + .05, 
               lng2 = dc_hq$lon[2] - ___, 
               lat2 = dc_hq$lat[2] - .05)
Edit dan Jalankan Kode