Toplu silahlı saldırılar: girişler ekle

Toplu silahlı saldırılar, Amerika Birleşik Devletleri'nde yoğun tartışma konusu oldu. 1982'den bu yana yaşanan toplu saldırıların bulunduğu bir kamu veritabanı, kâr amacı gütmeyen Mother Jones tarafından yayımlandı. Önümüzdeki üç egzersizde, bu saldırıları etkileşimli bir harita üzerinde keşfetmen için bir Shiny uygulaması oluşturacaksın.

Bu egzersizde, fatalities için filtreleme yapan bir kaydırıcı girişi ve tarih aralığına göre filtreleme yapan bir tarih aralığı girişi ekleyeceksin. Uygulaman, bu ekran görüntüsündeki görsele benzemeli.

ABD'nin etkileşimli bir haritası ve bir tarih aralığı ile ölüm sayısını seçmeye yönelik kontroller içeren bir uygulama

mass_shootings veri kümesini ve shiny, dplyr ve leaflet paketlerini zaten yükledik.

Bu egzersiz, kursun bir parçasıdır

R ile Shiny Kullanarak Web Uygulamaları Geliştirme

Kursa Göz Atın

Egzersiz talimatları

mass_shootings veri kümesini, ölüm sayısına göre filtrelemek için nb_fatalities adlı bir kaydırıcı girişi ekle.
Bir tarih aralığına göre filtrelemek için date_range adlı bir tarih aralığı girişi ekle.

Uygulamalı etkileşimli egzersiz

Bu egzersizi bu örnek kodu tamamlayarak deneyin.

ui <- bootstrapPage(
  theme = shinythemes::shinytheme('simplex'),
  leaflet::leafletOutput('map', height = '100%', width = '100%'),
  absolutePanel(top = 10, right = 10, id = 'controls',
    # CODE BELOW: Add slider input named nb_fatalities
    
    # CODE BELOW: Add date range input named date_range
    
  ),
  tags$style(type = "text/css", "
    html, body {width:100%;height:100%}     
    #controls{background-color:white;padding:20px;}
  ")
)

server <- function(input, output, session) {
  output$map <- leaflet::renderLeaflet({
    leaflet() %>% 
      addTiles() %>%
      setView( -98.58, 39.82, zoom = 5) %>% 
      addTiles()
  })
}

shinyApp(ui, server)

Kodu Düzenle ve Çalıştır