我最近在整里数据，突然发现一个令人蛋疼的问题，如何给横坐标排序（按照分类变量中的其中一项）？下面是我的代码。
x <- data.frame(Cultivar = c(rep("c39",3),rep("c52",3)),
                Data = rep(c("d16","d20","d21"),2),
                weight = c(3.18,2.80,2.74,2.26,3.11,1.47))
x
library(ggplot2)
ggplot(x, aes(x=Data, y=weight, fill=Cultivar)) +
  geom_bar(position="dodge",stat="identity")