Вы можете использовать reorder
:
qplot(reorder(factor(cyl),factor(cyl),length),data=mtcars,geom="bar")
Edit:
Чтобы иметь самую высокую полосу слева, вы должны использовать бит kludge:
qplot(reorder(factor(cyl),factor(cyl),function(x) length(x)*-1),
data=mtcars,geom="bar")
Я ожидал бы, что это также будет иметь отрицательные высоты, но это не так, поэтому он работает!
Вот альтернативный подход:
Text
или что угодно Система компоновки позаботится о смещении всех позиций элементов за вас. [ 116]