如下所示：
library(ggplot2)
library(ggthemes)
dt = data.frame(obj = c('A','D','B','E','C'), val = c(2,15,6,9,7))
dt$obj = factor(dt$obj, levels=c('D','B','C','A','E')) ## 设置柱条的顺序
p = ggplot(dt, aes(x = obj, y = val, fill = obj, group = factor(1))) +
geom_bar(stat = "identity", width = 0.5) + ## 修改柱条的宽度
theme_economist()
p
## 特注：dt$obj 是因子类型，ggplot2作图的顺序就是按照这个因子水平的顺序来的，
## 所以我们修改因子水平的顺序即可修改作图的顺序，具体情况可以输出一下 dt$obj
补充：ggplot柱状图调整顺序_1.3 让ggplot2的柱状图根据y的大小依次排列
方法：映射时使用reorder函数，将映射给x的横坐标的变量（）的次序，依据映射给y的变量的大小排列。
一、基本柱形图
#先看一个常见的柱状图，此处的fill是给每一条的柱状图同一个颜色，所以没有写在ggplot语句中；当然默认先把映射给x的Abb变量转化为因子变量（factor）
ggplot(upc, aes(x = Abb, y = Change)) +
geom_col(fill = "#669933")
发现： 柱子的大小没有任何规律，原因在于下面的x轴的坐标。虽然没有专门设置x轴字体，不是清晰，但可以看到x轴的排列是根据ggplot中映射给x的每个因子变量的首字母排列的，A、B、C...
所以要想生成我们想要的顺序的柱状图：要么手动设置因子的顺序，要么按照按照一定的逻辑排列：比如，按照y轴的值从小到大排列。那么：
二、使用reorder函数让柱状图有顺序
# 映射给x的不是简单的变量名为Abb的变量，而是将Abb变量根据Change变量（默认从小到大）reorder后的Abb变量
ggplot(upc, aes(x = reorder(Abb,Change), y = Change)) +
geom_col(fill = "#669933")
如图：
当然，想让y轴从大到小变化，只需在Change前面加个负号：
ggplot(upc, aes(x = reorder(Abb, - Change), y = Change)) +
geom_col(fill = "#669933")
以上为个人经验，希望能给大家一个参考，也希望大家多多支持编程网。如有错误或未考虑完全的地方，望不吝赐教。
