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

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