如何手动更改条形图的顺序？

Question

我有这个3列数据框，我想用ggplot绘制条形图。虽然我已按顺序排序了我希望它们显示在条形图中的行，ggplot似乎以我不想要的方式更改了条形序列。

我的示例数据框是：

    sample.df <- data.frame(checking_balance = c("< 0 DM","< 0 DM", "1 - 200 
         DM","1 - 200 DM","> 200 DM","> 200 DM"), default = 
         c("no","yes","no","yes","no","yes"), n = c(139,135,164,105,49,14))

我的ggplot条形图代码是：

    sample.qq <- ggplot(sample.df, aes(checking_balance, n)) + geom_bar(stat 
         = "identity", aes(fill = default), position = "dodge") + 
         ggtitle("checking balance vs default status") + theme(plot.title = 
         element_text(hjust = 0.5))+ scale_fill_manual(values=c("#66CC99", 
         "#CC6666"))

   sample.qq

理想情况下，在x轴上，标签应为< 0 DM，1 - 200 DM，> 200 DM，它们会逐渐显示不同的收入阈值，但ggplot只是改变了预期的顺序和我需要一个解决方案。非常感谢！