Use geom_area(position = "fill") , as in Figure 4.23, left: ggplot(uspopage, aes(x = Year, y = Thousands, fill = AgeGroup)) + geom_area(position = "fill", ...
確定! 回上一頁