겹쳐 그린 밀도 그래프

이번 연습에서는 밀도 그래프를 만들고 서로 겹쳐 그려, 세 게임 퍼블리셔(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 패키지는 이미 로드되어 있어요.

Activision, EA, Nintendo의 Critic_Score에 대한 밀도 곡선을 각각 계산해 d.a, d.e, d.n 객체에 저장하세요.
activision, ea, nintendo 순서로 Critic_Score의 겹쳐진 밀도 그래프를 만드세요.