R graphic samples日本棋院囲碁棋士の賞金ランキング(2011): type="h"で棒グラフ データ：shokin2011.csv（igodb.jpより作成） plot()のtypeを"h"に指定して縦棒で表示する。視覚効果は棒グラフと同じ。 後からpoints()で点を追加。 Y軸の最大値を1億円にするために独自に設定。 xaxt="n", yaxt="n"をオプションにつけて、後から axis() で軸を作成する。 prettyNum()を使って、数値に3桁ごとに","で区切る。 井山・山下・張栩の3人に7大タイトルが集中して、トップ3人で総取りの様相。 x <- read.csv("shokin2011.csv", as.is=T) plot(x$RANK, x$SHOKIN/10000, type="h", xlab="Rank", ylab="prize (10,000 yen)", main="
