Jelajahi Survei Kesehatan Mental di Teknologi 2014

Jangan gentar, pada latihan ini Anda akan membangun seluruh aplikasi ini (tanpa pesan galat kustom) sekaligus!

Untuk aplikasi ini, Anda akan menggunakan pertanyaan "Apakah menurut Anda mendiskusikan isu kesehatan mental dengan atasan akan berdampak negatif?" (variabel mental_health_consequence) dan "Apakah Anda merasa atasan memperlakukan kesehatan mental sama seriusnya dengan kesehatan fisik?" (mental_vs_physical) sebagai masukan multi-pilih, lalu menampilkan histogram Age dari responden. Untuk melihat pilihan untuk variabel-variabel ini, lakukan count() di konsol.

Ingat bahwa ketika selesai, aplikasi akan terlihat seperti ini (termasuk plot kosong): An app displaying questions from a Mental Health survey

shiny, ggplot2, dplyr, dan himpunan data mental_health_survey telah dimuat untuk Anda.

Latihan ini adalah bagian dari kursus

Membangun Aplikasi Web dengan Shiny di R

Lihat Kursus

Petunjuk latihan

UI:
- Tambahkan judul yang sesuai pada aplikasi.
- Tambahkan checkboxGroupInput(). Sertakan nilai bawaan untuk argumen selected.
- Tambahkan pickerInput() dengan argumen multiple disetel ke TRUE.
- Tambahkan plotOutput() di panel utama.
Server:
- Tambahkan output yang menampilkan histogram Age responden, difilter oleh dua masukan tersebut.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

ui <- fluidPage(
  # CODE BELOW: Add an appropriate title

  sidebarPanel(
  	# CODE BELOW: Add a checkboxGroupInput

    
    
    
    

  	# CODE BELOW: Add a pickerInput

    
    
    
    
    
  ),
  mainPanel(
	# CODE BELOW: Display the output

  )
)

server <- function(input, output, session) {
  # CODE BELOW: Build a histogram of the age of respondents
  # Filtered by the two inputs

  
  
  
  
  
  
  
}

shinyApp(ui, server)

Edit dan Jalankan Kode