I am using this code to produce the picture:
ggplot() +
stat_density(kernel = "biweight",aes(x=fd, colour='red'), data=dw,position="identity",geom="line") +
stat_density(kernel = "biweight",aes(x=fd, colour='blue'), data=ds,position="identity",geom="line")+
stat_density(kernel = "biweight",aes(x=fd, colour='orange'), data=dmw,position="identity",geom="line")+
stat_density(kernel = "biweight", aes(x=fd, colour='green'), data=dne,position="identity",geom="line")+
scale_colour_manual(name='Regions',values=c('red'='red', 'blue'='blue', 'orange'='orange', 'green'='green'), labels=c('West','South','Midwest','Northeast'))+
scale_y_continuous(expand = c(0,0),limits = c(0,0.025)) +
coord_cartesian(xlim = c(0, 200))
Now,
How do I remove the green line in the y and x-axis? I am not sure why it is there.(Solved)- How do I change the legend box to just a dot of the color?
How can I make the bottom of the figure to start from y=0 instead of empty space there?(Solved)
Thank you.
P.S. Not able to use MELT for the dataframes because they are of different lengths but same name 'fd'.