ファセットの自動化
前の演習では、ファセット付きの散布図を手作業で作成しました。グループが 2 つだけだったので、それほど面倒ではありませんでした。しかし、vgsales2016 データセットには 6 つのプラットフォームがあり、6 つの散布図を手で書くのはとても骨が折れます。
この演習では、次のテンプレートを使って、group_by(), nest(), mutate(), map2() によるファセット付き散布図の自動作成を練習します。
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)
この演習はコースの一部です
R で学ぶ plotly によるインタラクティブ可視化
演習の手順
group_by(),nest(),mutate(),map2()を使って、x 軸にCritic_Score、y 軸にUser_Scoreをとり、Platformでファセットを分けた散布図を作成してください。- 3 行のグリッドにファセットを配置してください。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Create a faceted scatterplot of User_Score vs. Critic_Score with 3 rows
vgsales2016 %>%
___(___) %>%
___() %>%
mutate(
plot = ___(
___, ___,
\(data, Platform)
)) %>%
subplot(nrows = ___, shareY = TRUE, shareX = TRUE)