Births78 %>% ggplot(aes(x=date, y=births, fill=wday)) + geom_area()+ ggtitle("US Births in 1978"). Using area does not produce a good plot.
確定! 回上一頁