Explorează sondajul Mental Health in Tech 2014

Nu te lăsa intimidat, dar în acest exercițiu vei construi întreaga aplicație (fără mesajul de eroare personalizat) dintr-o singură etapă!

Pentru această aplicație, vei folosi întrebările „Crezi că discutarea unei probleme de sănătate mintală cu angajatorul tău ar avea consecințe negative?" (variabila mental_health_consequence) și „Simți că angajatorul tău tratează sănătatea mintală cu aceeași seriozitate ca sănătatea fizică?" (mental_vs_physical) ca intrări de tip selector multiplu, apoi vei afișa o histogramă a vârstei (Age) respondenților. Pentru a vedea opțiunile disponibile pentru aceste variabile, aplică count() asupra lor în consolă.

Amintește-ți că, la final, aplicația va arăta astfel (inclusiv graficul gol): O aplicație care afișează întrebări dintr-un sondaj despre sănătatea mintală

shiny, ggplot2, dplyr și setul de date mental_health_survey au fost deja încărcate pentru tine.

Acest exercițiu face parte din cursul

Crearea aplicațiilor web cu Shiny în R

Vezi cursul

Instrucțiuni pentru exercițiu

UI:
- Adaugă un titlu potrivit aplicației.
- Adaugă un checkboxGroupInput(). Include o valoare implicită pentru argumentul selected.
- Adaugă un pickerInput() cu argumentul multiple setat la TRUE.
- Adaugă un plotOutput() în panoul principal.
Server:
- Adaugă un output care afișează o histogramă a vârstei (Age) respondenților, filtrată după cele două intrări.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

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)

Editează și rulează codul