Добавьте легенду к точечной диаграмме ggplot2, включая дополнительные линии
Я хотел бы добавить легенду кggplot2
график рассеяния, который различает линию регрессии и отдельную линию, которую я добавил.
Например,
library(ggplot2)
set.seed(123)
data1=rnorm(1000,1,2)
data2=rnorm(1000,1,4)
DF=data.frame(data1,data2)
ggplot(DF,aes(data1,data2))+geom_point(colour="dodgerblue",alpha=0.75)+geom_smooth(method=lm,se=F,aes(colour="Line of best fit"))+
geom_abline(intercept = 0, slope = 1, linetype="dashed", colour="black", alpha=1,size=1)
На этом графике есть две линии: красная линия регрессии и черная линия с уравнениемy=x
.
Мне удалось добавить линию регрессии к легенде, но я хотел бы добавить черную линию. Как примечание, я также хотел бы иметь возможность изменить название легенды сcolour
.