change plot to geom_area