Automatické facetování

V předchozím cvičení jsi facetovaný bodový graf vytvořil/a ručně. To nebylo příliš zdlouhavé, protože ses zaměřoval/a jen na dvě skupiny. V datasetu vgsales2016 je ale 6 platforem a ruční psaní 6 samostatných bodových grafů by bylo velmi únavné.

V tomto cvičení si procvičíš použití funkcí group_by(), nest(), mutate() a map2() k automatizaci tvorby facetovaného bodového grafu podle následující šablony:

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)

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

Interaktivní vizualizace dat s plotly v R

Zobrazit kurz

Pokyny k cvičení

Pomocí funkcí group_by(), nest(), mutate() a map2() vytvoř facetovaný bodový graf, kde osa x zobrazuje Critic_Score, osa y zobrazuje User_Score a jednotlivé facety jsou definovány proměnnou Platform.
Uspořádej facety do mřížky se 3 řádky.

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

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

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

Upravit a spustit kód