Rでバブルチャートを描画する方法 その2

lattice パッケージの xyplot 関数を使う。

> library(lattice)
> xyplot(Temp ~ Wind, data=airquality, pch=21, cex=sqrt(airquality$Ozone / pi), fill=rainbow(nrow(airquality)), col="white", alpha=0.8)

モデル式に条件変数を指定するとマルチパネルに描画してくれるので、層別にデータを可視化したい場合に便利。

> airquality$month <- as.factor(airquality$Month)
> xyplot(Temp ~ Wind | month, data=airquality, pch=21, cex=sqrt(airquality$Ozone / pi), fill=rainbow(nrow(airquality) / nlevels(airquality$month)), col="white", alpha=0.8)