ドットプロット
ドットプロットは dotchart(x, labels=) 関数で作成できる。xには数値ベクトルを、labelsにはそれぞれのドットのラベルを示す文字ベクトルを記述する。groups = オプションでドットをグループ化できる。gcolor = で色を指定したり、cexでサイズを変えることができる。
# ドットプロット
dotchart(mtcars$mpg,labels=row.names(mtcars),cex=.7,
main="Gas Milage for Car Models",
xlab="Miles Per Gallon")
click to view
# ドットプロットをシリンダー (cyl) で群分けして色つけ。
x <- mtcars[order(mtcars$mpg),] # mpg で並べ替え。
x$cyl <- factor(x$cyl) # 因子変数にしておく
x$color[x$cyl==4] <- "red"
x$color[x$cyl==6] <- "blue"
x$color[x$cyl==8] <- "darkgreen"
dotchart(x$mpg,labels=row.names(x),cex=.7,groups= x$cyl,
main="Gas Milage for Car Models\ngrouped by cylinder",
xlab="Miles Per Gallon", gcolor="black", color=x$color)
click to view
Going Further
より高度なドットプロットはHmisc パッケージのdotplot2( ) 関数や、lattice パッケージのpanel.dotplot( ) 関数で作成できる。 William Jacobyの 論文 も参照。