enter image description here
So Here is my code:
ggplot(Alabama, aes(x=AlYear)) + geom_line(aes(y = AlMed), color = "darkred") + geom_l