Назначение определенных цветов и упорядоченный фактор в ggplot

Question

Я пытаюсь назначить определенные цвета моему графику boxplot / jitter, но функции 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"))