geom_area情节与区域和轮廓ggplot

I am trying to make a stacked geom_area plot, but would like to outline each area plot (works on first 'red' area but not the blue) with a line. Here is my best attempt but I can't figure out how to make the line type stacked also. Ideas? I am trying to make a stacked geom_area plot, b