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

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

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