排序的关键是按照您想要的顺序设置因子的级别。有序因子不是必需的；有序因子中的额外信息不是必需的，如果这些数据用于任何统计模型，可能会导致错误的参数化——多项式对比不适用于此类名义数据。

## set the levels in order we want
theTable <- within(theTable, 
                   Position <- factor(Position, 
                                      levels=names(sort(table(Position), 
                                                        decreasing=TRUE))))
## plot
ggplot(theTable,aes(x=Position))+geom_bar(binwidth=1)

从最一般意义上讲，我们只需将因子级别设置为所需的顺序即可。如果未指定，则因子的级别将按字母顺序排序。您还可以在对因子的调用中指定级别顺序，如上所示，其他方式也是可行的。

theTable$Position <- factor(theTable$Position, levels = c(...))