Como formatar valores numéricos para a legenda ggplot2?

Eu estou trabalhando para terminar um gráfico gerado usando o ggplot2 assim ...

ggplot(timeSeries, aes(x=Date, y=Unique.Visitors, colour=Revenue)) 
+ geom_point() + stat_smooth() + scale_y_continuous(formatter=comma)

Anexei o resultado e você pode ver os valores numéricos na legenda de Receita sem vírgula. Como posso adicionar uma vírgula a esses valores? Consegui usar scale_y_continuous para o eixo, isso também pode ser usado para a legenda?

questionAnswers(3)

yourAnswerToTheQuestion