Prozkoumej průzkum Mental Health in Tech z roku 2014

Neboj se – v tomto cvičení sestavíš celou aplikaci (bez vlastní chybové zprávy) najednou od začátku do konce!

Tato aplikace bude využívat otázky „Myslíš si, že by řešení duševního zdraví se zaměstnavatelem mělo pro tebe negativní důsledky?" (proměnná mental_health_consequence) a „Máš pocit, že tvůj zaměstnavatel bere duševní zdraví stejně vážně jako fyzické zdraví?" (mental_vs_physical) jako vstupy s možností výběru více hodnot, a zobrazí histogram věku (Age) respondentů. Jaké hodnoty tyto proměnné nabývají, zjistíš pomocí count() v konzoli.

Až budeš hotov/a, aplikace bude vypadat takto (včetně prázdného grafu): An app displaying questions from a Mental Health survey

Balíčky shiny, ggplot2, dplyr a dataset mental_health_survey jsou už načteny.

Toto cvičení je součástí kurzu

Tvorba webových aplikací se Shiny v R

Zobrazit kurz

Pokyny k cvičení

UI:
- Přidej do aplikace vhodný titulek.
- Přidej checkboxGroupInput() – nezapomeň nastavit výchozí hodnotu argumentu selected.
- Přidej pickerInput() s argumentem multiple nastaveným na TRUE.
- Do hlavního panelu přidej plotOutput().
Server:
- Přidej výstup, který zobrazí histogram věku (Age) respondentů filtrovaný podle obou vstupů.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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)

Upravit a spustit kód