Automatyczne tworzenie faset

W poprzednim ćwiczeniu ręcznie tworzyłeś wykres punktowy z fasetami. Nie było to zbyt uciążliwe, bo skupiałeś się tylko na dwóch grupach. W zbiorze danych vgsales2016 jest jednak 6 platform – ręczne kodowanie 6 wykresów punktowych byłoby bardzo żmudne.

W tym ćwiczeniu poćwiczysz użycie funkcji group_by(), nest(), mutate() i map2() do automatycznego tworzenia wykresu punktowego z fasetami według poniższego szablonu:

data %>%
  group_by(factor) %>%
  nest() %>%
  mutate(
      plot = map2(data, factor,
        \(data, factor) 
            plot_ly(data = data, x = ~x, y = ~y) %>%
                  add_markers(name = ~factor)
    )) %>%
  subplot(nrows = R, shareY = TRUE, shareX = TRUE)

To ćwiczenie jest częścią kursu

Interaktywna wizualizacja danych z plotly w R

Zobacz kurs

Instrukcje do ćwiczenia

Użyj funkcji group_by(), nest(), mutate() i map2(), aby utworzyć wykres punktowy z fasetami, na którym oś x przedstawia Critic_Score, a oś y – User_Score. Fasety powinny być zdefiniowane przez zmienną Platform.
Ułóż fasety w siatce złożonej z 3 wierszy.

Interaktywne ćwiczenie praktyczne

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

# Create a faceted scatterplot of User_Score vs. Critic_Score with 3 rows
vgsales2016 %>%
  ___(___) %>%
  ___() %>%
  mutate(
    plot = ___(
      ___, ___,
      \(data, Platform) 
      	
    )) %>%
  subplot(nrows = ___, shareY = TRUE, shareX = TRUE)

Edytuj i uruchom kod