Aplikace 2: Populární jména

Tvorba Shiny aplikace je modulární proces. Začneš UI, pak se pustíš do serverové části a postupně buduješ výstupy na základě vstupů od uživatele. Čím více tento přístup záměrně procvičuješ, tím snazší bude vytvářet kvalitní aplikace.

Nyní vytvoříš Shiny aplikaci, která uživateli umožní vybrat pohlaví a rok a zobrazí 10 nejoblíbenějších jmen daného roku jako sloupcový graf podílu narození (prop) podle jména (name). Výsledná aplikace by měla vizuálně odpovídat snímku níže.

Aplikace, kde výběr jména a posuvník roku jsou v levém postranním panelu, zatímco graf se zobrazuje vpravo v hlavním panelu

Pro tebe jsme připravili funkci get_top_names(), která vrátí 10 nejoblíbenějších jmen pro zadaný year a sex. Například 10 nejoblíbenějších mužských jmen roku 2000 získáš pomocí get_top_names(2000, "M").

Máme také načtený balíček ggplot2. Sloupcový graf z datového rámce d se sloupci x a y vytvoříš takto:

ggplot(d, aes(x = x, y = y)) +
  geom_col()

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

Tvorba webových aplikací se Shiny v R

Zobrazit kurz

Pokyny k cvičení

Přidej název na vrchol aplikace a nastav rozložení s postranním panelem.
Do postranního panelu přidej vstup, který uživateli umožní vybrat pohlaví (M nebo F).
Do postranního panelu přidej posuvník pro výběr roku (1880 až 2017).
Do hlavního panelu přidej výstup pro graf.
Na server přidej výstup, který vykreslí sloupcový graf na základě year a sex. Do složených závorek vykreslovací funkce můžeš vložit více řádků kódu: render***({___}).

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(
  
)

server <- function(input, output, session) {
  
}

shinyApp(ui = ui, server = server)

Upravit a spustit kód