I'm trying to show the discharge of three different rivers in 2005 on the same plot. However, a legend didn't pop up and I looked online to find ways to add a manual legend, but it isn't working.
Here's the plot:
Here is my code to get the plot and legend:
colors <- c("St Joseph" = "blue", "Kalamazoo" = "red", "Muskegon" = "darkgreen") ggplot() + geom_line(data=stj05, aes(x=Date, y=Discharge_cfs), color="blue", size=1) + labs(title="Streamflow for St. Joseph, Kalamazoo, and Muskegon Rivers in 2005", color = "Legend") + coord_cartesian() + ylab("Discharge (cfs)") + geom_line(data=kal05, aes(x=Date, y=Discharge_cfs), color="red", size=1) + geom_line(data=mus05, aes(x=Date, y=Discharge_cfs), color="darkgreen", size=1) + scale_color_manual(values=colors)
Can anyone help me get a legend showing the individual rivers and their colors?
Thanks so much!