Why isn't my legend showing up when I plot this?
ggplot(data=baseline_total, aes(x=sighd_rater_total, color="sighd_rater_total")) +
geom_area(stat="bin", col = 'light blue', fill='light blue') +
geom_freqpoly(data=baseline_total,aes(x=sighd_tier1_total, color="sighd_tier1_total"), stat = "bin", col = 'dark blue')