!!!geom_boxplot()
{{pre
library(ggplot2)

g <- ggplot(dat.all.size)
g <- g + aes(x=Year, y=size)
g <- g + geom_boxplot()
plot(g)
}}

!jitter
 g <- g + geom_jitter(size = 0.5)
をplot(g)の前に加えると分布がわかりやすい。

!色 オプション fill=Year
 g <- g + aes(x=Year, y=size, fill=Year)


!軸ラベルを変える
 g <- g + theme_bw() + ylab("Utterances") + xlab("Year")

!y軸の範囲を指定 coord_cartesian(ylim=(c(0,65)))
 g <- g + theme_bw() + ylab("Utterances") + xlab("Year") + coord_cartesian(ylim=(c(0,65)))