円グラフ
円グラフはおすすめしない。棒グラフ か ドットプロット を使おう。面積よりも長さのほうがわかりやすい。円グラフはpie(x, labels=) で作成できる。xには正の数値ベクトルを付置し、labels=には文字ベクトルを付置する。
シンプルな円グラフ
slices <- c(10, 12,4, 16, 8)
lbls <- c("US", "UK", "Australia", "Germany", "France")
pie(slices, labels = lbls, main="Pie Chart of Countries")
パーセンテージつきの円グラフ
slices <- c(10, 12, 4, 16, 8)
lbls <- c("US", "UK", "Australia", "Germany", "France")
pct <- round(slices/sum(slices)*100)
lbls <- paste(lbls, pct)
# add percents to labels
lbls <- paste(lbls,"%",sep="") # ad % to labels
pie(slices,labels = lbls, col=rainbow(length(lbls)),
main="Pie Chart of Countries")
3D円グラフ
pie3D( ) 関数 in the plotrix パッケージ
library(plotrix)
slices <- c(10, 12, 4, 16, 8)
lbls <- c("US", "UK", "Australia", "Germany", "France")
pie3D(slices,labels=lbls,explode=0.1,
main="Pie Chart of Countries ")
データフレームからラベルつきの円グラフをつくる
mytable <- table(iris$Species)
lbls <- paste(names(mytable), "\n", mytable, sep="")
pie(mytable, labels = lbls,
main="Pie Chart of Species\n (with sample sizes)")