在ggplot中分配特定颜色和有序因子

Question

我正在尝试为我的箱线图/抖动图分配特定的颜色，但是scale_fill_manual和scale_colour_manual函数似乎不起作用。

执行此代码时，图形上的所有点均保持黑色：

DR_Ranges <-ggplot(data=Temp, aes(x=DRLevel, y=Range)) +
                   geom_jitter(size=1.2) +
                   geom_boxplot(size=1.2, alpha=0.5)

DR_Ranges + scale_fill_manual(values=c("Low"="Green", 
                                       "Moderate"="Yellow", 
                                       "Considerable"="Orange", 
                                       "High"="Red", 
                                       "Extreme"="Black"))