gg <- ggplot(df, aes(x=as.numeric(Year), y=Value)) gg <- gg + geom_area(aes(colour=Sector, fill=Sector)) gg <- gg + ...
確定! 回上一頁