具有多个叠加功能的绘图图例

Question

  

可能重复：
  ggplot2 add a legend for several stat_functions

我正在尝试在散点图（stat_function）上叠加3个函数（使用geom_point），并为叠加函数添加图例。我已成功制作了一个包含这些功能的情节，但我不确定如何添加图例。

ggplot(questionnaire,aes(A,B)) + 
  geom_point() + 
  stat_function(...,colour="blue") + 
  stat_function(...,colour="red") + 
  stat_function(...colour="green")

有关如何添加解释每个不同颜色线条的图例的任何帮助都将受到赞赏。