円グラフ

円グラフはおすすめしない。棒グラフドットプロット を使おう。面積よりも長さのほうがわかりやすい。円グラフは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")

simple pie chart click to view

パーセンテージつきの円グラフ

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")

fancy pie chart click to view

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 ")

3D pie chart click to view

データフレームからラベルつきの円グラフをつくる

mytable <- table(iris$Species)
lbls <- paste(names(mytable), "\n", mytable, sep="")
pie(mytable, labels = lbls,
   main="Pie Chart of Species\n (with sample sizes)")

pie chart from dataframe click to view