Rでバブルチャートの作り方(ggplot)

Rのggplot2パッケージを利用してバブルチャートを作成します。バブルの大きさの調整方法もご紹介します。

バブルチャート作成

sizeで描画している点の大きさを変更でき、scale_sizeのsizeを利用してバブルの大きさを変更することができます。

library(tidyverse)
 library(scales)
 d <- read.csv("https://raw.githubusercontent.com/maruko-rosso/datasciencehenomiti/master/data/ShopSales.csv")

# データ準備
d_2 <-    d %>% 
   mutate(sales = quantity * price) %>% 
   group_by(staff) %>% 
   summarise(
     sales = sum(sales),
     price_mean = mean(price), 
     quantity_mean = mean(quantity)
   )

# バブルチャート作成
d_2 %>% 
   ggplot(aes(x = price_mean,y = quantity_mean, size = sales,label = staff)) +
   geom_point(alpha = 0.5) +
   scale_size(range = c(.1, 24), name="lagend",labels = scales::comma) 

バブルチャート２：色分けとバブルの閾変更

colで色分けができるのが他のグラフの作り方と同じです。breaksでバブルの大きさを変更できます。

d_2 %>% 
   ggplot(aes(x = price_mean,y = quantity_mean,size = sales,label = staff,col = staff)) +
   geom_point(alpha = 0.5) +
   scale_size(range = c(1, 24),breaks = 100000000, name="lagend",labels = scales::comma) 

d_2 %>% 
   ggplot(aes(x = price_mean,y = quantity_mean,size = sales,label = staff,col = staff)) +
   geom_point(alpha = 0.5) +
   scale_size(range = c(1, 24),breaks = c(100000000,200000000,300000000), name="lagend",labels = scales::comma)