Aplikacja 2: Popularne imiona niemowląt

Tworzenie aplikacji Shiny to proces modułowy. Zaczynasz od UI, a następnie pracujesz nad kodem serwera, budując wyniki na podstawie inputów użytkownika. Im więcej ćwiczysz to podejście w sposób świadomy, tym łatwiej będzie ci tworzyć dobre aplikacje.

Teraz zbudujesz aplikację Shiny, która pozwoli użytkownikowi wybrać płeć i rok, a następnie wyświetli 10 najpopularniejszych imion w danym roku w postaci wykresu słupkowego przedstawiającego udział urodzeń (prop) według imienia (name). Gotowa aplikacja powinna wyglądać podobnie do zrzutu ekranu poniżej.

Aplikacja, w której selektor imion i suwak roku znajdują się w lewym pasku bocznym, a wykres – po prawej stronie w panelu głównym

Dostępna jest funkcja get_top_names(), która wyodrębnia 10 najpopularniejszych imion dla podanego year (roku) i sex (płci). Na przykład, aby uzyskać 10 najpopularniejszych imion męskich z roku 2000, użyj get_top_names(2000, "M").

Załadowany jest również pakiet ggplot2. Wykres słupkowy na podstawie ramki danych d z kolumnami x i y możesz stworzyć w następujący sposób:

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

To ćwiczenie jest częścią kursu

Tworzenie aplikacji internetowych z Shiny w R

Zobacz kurs

Instrukcje do ćwiczenia

Dodaj tytuł na górze aplikacji oraz układ z paskiem bocznym.
Dodaj do paska bocznego input umożliwiający użytkownikowi wybór płci (M lub F).
Dodaj do paska bocznego suwak umożliwiający użytkownikowi wybór roku (1880–2017).
Dodaj element wykresu w panelu głównym.
Dodaj do serwera output renderujący wykres słupkowy na podstawie year i sex. Pamiętaj, że wewnątrz nawiasów klamrowych funkcji renderującej możesz umieścić wiele linii kodu: render***({___}).

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

ui <- fluidPage(
  
)

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

shinyApp(ui = ui, server = server)

Edytuj i uruchom kod