重疊的密度圖

在這個練習中，你會學到如何建立密度圖，並將它們重疊，以比較三家電玩發行商的評論分數分佈：Activision、Electronic Arts，以及 Nintendo。

若要為 Critic_Score 建立密度圖，先把 density() 指令的結果存起來，接著把 x 與 y 座標傳給 add_lines()：

d <- density(vgsales2016$Critic_Score, na.rm = TRUE)
plot_ly() %>%
  add_lines(x = ~d$x, y = ~d$y, fill = 'tozeroy') %>%
  layout(xaxis = list(title = 'Critic score'),
         yaxis = list(title = 'Density'))

留意你可以用熟悉的程式碼，輕鬆建立新的圖表類型！fill = 'tozeroy' 參數會填滿曲線下方的區域。

資料框 activision、ea 和 nintendo 已載入，plotly 也已可用。

本練習屬於課程

使用 R 的 plotly 互動式資料視覺化

檢視課程

練習說明

分別計算 Activision、EA 與 Nintendo 的 Critic_Score 密度曲線，並將結果分別存入物件 d.a、d.e、d.n。
依序為 activision、ea、nintendo 建立重疊的 Critic_Score 密度圖（依該順序）。

動手互動練習

試著完成這個範例程式碼，體驗一下這個練習。

# Compute density curves
d.a <- density(___, na.rm = TRUE)
d.e <- density(___, na.rm = TRUE)
d.n <- density(___, na.rm = TRUE)

# Overlay density plots
plot_ly() %>%
  add_lines(x = ___, y = ___, name = "Activision", fill = 'tozeroy') %>%
  add_lines(x = ___, y = ___, name = "Electronic Arts", fill = 'tozeroy') %>%
  add_lines(x = ___, y = ___, name = "Nintendo", fill = 'tozeroy') %>%
  layout(xaxis = list(title = 'Critic Score'),
         yaxis = list(title = 'Density'))

編輯並執行程式碼