Предотвращение второй легенды

У меня есть ggplot, который также отображает легенду:

ggplot(dt.m, aes(x=pct.on.OAC.cont,y=Number.of.Practices, fill=Age.Group)) +
    geom_bar(stat="identity",position=position_dodge())

Когда я добавляю еще одну строку, я также получаю вторую легенду:

geom_smooth(aes(x=pct.on.OAC.cont,y=Number.of.Practices, colour=Age.Group), se=F, alpha=0.5)

Как предотвратить отображение второй легенды?