不適切なグラフ in ggplot2

「以下に示すような図を『Excel で描くにはどうすればよいか』をビデオで説明しているサイト http://www.excelcharts.com/blog/the-consultants-chart-revisited/ があるが，大変手間がかかるようだけど，ggplot2 でやれば簡単だよ」というサイト http://learnr.wordpress.com/2010/08/16/consultants-chart-in-ggplot2/ があるけど，そもそもこんな図は不適切。ヨイコハマネシテハイケマセン。

これは ggplot2 で描いたものだというが，セクターの面積がデータの大きさを反映していない。

本当は，以下のような棒グラフを描くべきなのだ。

しかしまあ，なんですね～。なぜこうも，派手な色使いをするんだろうか。

色にも，膨張色と縮小色があるんだから，その影響もあるだろうし，何よりも，眼がチカチカする。

それにまた，右端の凡例なんて，意味ねー!

まあ，必要ないけど　ggplot2 を使ったプログラム。

set.seed(9876)
DF <- data.frame(variable = 1:10, value = sample(10,
    replace = TRUE))
DF
library(ggplot2)
ggplot(DF, aes(factor(variable), value, fill = factor(variable))) + geom_bar(width = 1)
last_plot() + scale_y_continuous(breaks = 0:10) +
    coord_polar() + labs(x = "", y = "") + opts(legend.position = "none",
    axis.text.x = theme_blank(), axis.text.y = theme_blank(),
axis.ticks = theme_blank())