Legend does not show line type in ggplot2 density plot
density-plot, ggplot2, legend-properties, r
Solution
Put `linetype=` inside `aes()` for each `stat_density()` with the same names as for `colors=` and then use `scale_linetype_manual()` to set types as you need. If you use the same legend name for linetypes and colors, both legend will be put together.
ggplot(data=df)+
stat_density(aes(x=R1, colour="rho = -0,6",linetype="rho = -0,6"),
adjust=4, lwd=0.5, geom="line", position="identity")+
stat_density(aes(x=R2, colour="rho = 0,6",linetype="rho = 0,6"),
adjust=4, lwd=0.5, geom="line", position="identity")+
stat_density(aes(x=R3, colour="rho = 0", linetype="rho = 0"),
adjust=4, lwd=0.5, geom="line", position="identity")+
xlim(-0.5, 0.5)+
xlab("Renditen")+
ylab("Dichte")+
ggtitle("Renditeverteilung im Heston-Modell")+
theme(plot.title=element_text(face="bold", size=16, vjust=2),
axis.title.x=element_text(vjust=-1, size=12),
axis.title.y=element_text(vjust=-0.25, size=12),
legend.text=element_text(size=12), legend.title=element_text(size=12),
legend.margin=unit(1.5, "cm"),
legend.key.height=unit(1.2, "line"),
legend.key.size=unit(0.4, "cm"),
legend.key=element_rect(fill=NA),
legend.background=element_rect(colour="darkgrey"),
plot.margin=unit(c(1,1,1,1), "cm"))+
scale_colour_manual(values=c("rho = -0,6"="red", "rho = 0,6"="blue",
"rho = 0"="black"), name="Korrelation")+
scale_linetype_manual(values=c("rho = -0,6"=1, "rho = 0,6"=1,
"rho = 0"=2), name="Korrelation")
Problem
I created a density plot with ggplot from a dataframe with 3 variables. One density line is dotted, but the legend shows a solid line for this line. The data looks like this: ``` > head(df) R1 R2 R3 1 0.085383867 0.04366546 0.055320885 2 0.059148932 0.03477045 0.040804048 3 -0.181279986 -0.10189900 -0.097218145 4 0.002307494 -0.01137235 -0.003585813 5 -0.047816198 -0.04932982 -0.009389939 6 0.030535090 0.02544292 0.017650949 ``` The code for the plot is: ``` ggplot(data=df)+ stat_density(aes(x=R1, colour="rho = -0,6"), adjust=4, lwd=0.5, geom="line", position="identity")+ stat_density(aes(x=R2, colour="rho = 0,6"), adjust=4, lwd=0.5, geom="line", position="identity")+ stat_density(aes(x=R3, colour="rho = 0"), linetype=2, adjust=4, lwd=0.5, geom="line", position="identity")+ xlim(-0.5, 0.5)+ xlab("Renditen")+ ylab("Dichte")+ ggtitle("Renditeverteilung im Heston-Modell")+ theme(plot.title=element_text(face="bold", size=16, vjust=2), axis.title.x=element_text(vjust=-1, size=12), axis.title.y=element_text(vjust=-0.25, size=12), legend.text=element_text(size=12), legend.title=element_text(size=12), legend.margin=unit(1.5, "cm"), legend.key.height=unit(1.2, "line"), legend.key.size=unit(0.4, "cm"), legend.key=element_rect(fill=NA), legend.background=element_rect(colour="darkgrey"), plot.margin=unit(c(1,1,1,1), "cm"))+ scale_colour_manual(values=c("rho = -0,6"="red", "rho = 0,6"="blue", "rho = 0"="black"), name="Korrelation") ``` And finally the plot: How can I get the legend to show a dotted line for the third density line (variable R3)? Thank you in advance!