从在线条形图指南:
qplot(factor(cyl), data=mtcars, geom="bar", fill=factor(gear)) 
如何让5个位于底部,4个位于底部,3个位于顶部?
qplot(factor(cyl), data=mtcars, geom='bar', fill=factor(gear, level=5:3))