Automatiserad facettning
I föregående övning skapade du ett facetterat spridningsdiagram manuellt. Det var inte särskilt tidskrävande eftersom du bara arbetade med två grupper. I datamängden vgsales2016 finns det däremot 6 plattformar, och att koda 6 spridningsdiagram för hand skulle vara mycket omständligt.
I den här övningen får du öva på att använda group_by(), nest(), mutate() och map2() för att automatisera skapandet av ett facetterat spridningsdiagram med följande mall:
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)
Den här övningen är en del av kursen
Interaktiv datavisualisering med plotly i R
Övningsinstruktioner
- Använd
group_by(),nest(),mutate()ochmap2()för att skapa ett facetterat spridningsdiagram medCritic_Scorepå x-axeln ochUser_Scorepå y-axeln, där facetterna definieras avPlatform. - Arrangera facetterna i ett rutnät med 3 rader.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# Create a faceted scatterplot of User_Score vs. Critic_Score with 3 rows
vgsales2016 %>%
___(___) %>%
___() %>%
mutate(
plot = ___(
___, ___,
\(data, Platform)
)) %>%
subplot(nrows = ___, shareY = TRUE, shareX = TRUE)