ggplot2 добавляет легенду для нескольких stat_functions
Я вижу много вопросов о том, как настроить легенды, но даже не могу настроить легенду. Я хотел бы иметь легенду, объясняющую, что черная линия является квадратичной, а зеленая - кубической.
<code>library(ggplot2) myfun1 <- function(x) x^2 myfun2 <- function(x) x^3 myplot <- ggplot(data = data.frame(x = 1:5, y= 1:5), aes(x=x, y=y)) + stat_function(fun = myfun1, color="green") + stat_function(fun = myfun2, color="black") </code>