axjack's blog

axjack is said to be an abbreviation for An eXistent JApanese Cool Klutz.

ggplot, geom_point, facet_gridの練習

はじめに

ggplotやqplotを日々練習しています。ggplot, geom_point, facet_gridを組み合わせると、

  • グラフ内側のx軸(量的)
  • グラフ内側のy軸(量的)
  • グラフ外側の横側(質的)
  • グラフ外側の上側(質的)
  • 点の色(質的・量的)

のように5変数くらい同時に、割と分かりやすく表示することができる。分割が煩わしいなら、facet_gridの項を消せば1つの散布図色付きのように表示することができる。

コード

例1

library(dplyr)
library(ggplot2)
ggplot(mpg) + geom_point(aes(cty,displ,colour=fl)) + facet_grid(year~cyl)

f:id:axjack:20190228230847p:plain

例2

library(ISLR)
a1 <- Auto %>% mutate(year_ = ifelse(year <= 80, 70, 80))
ggplot(a1) + geom_point(aes(displacement,horsepower,colour=weight)) + facet_grid(year_~origin) 

f:id:axjack:20190228231005p:plain