Я использую ggplot2, чтобы иметь некоторые графики плотности с легендами, но я не могу добавить легенду к своему окончательному результату.

m <- ggplot(chickwts, aes(x = weight))
m + geom_density(kernel = "gaussian", adjust = .3, colour="green", size=1)+
  geom_density(kernel = "gaussian", adjust = 1, colour="red", size=1)+
  geom_density(kernel = "gaussian",adjust = 5, colour="blue", size=1)+
  geom_density(kernel = "gaussian",adjust = 10, colour="yellow", size=1)+
  geom_density(kernel = "gaussian",adjust = 20, colour="orange", size=1)

Я использовал несколько синтаксисов, которые я нашел здесь, но ни один из них не работал. Спасибо.