为堆积面积图指定颜色

Specify colour to a stacked area graph

我想在下面的代码

中为每一列"Sector"更改特定的颜色(比默认的彩虹颜色更深)

我听说 geom_area 不允许更改颜色?如果是这样,还有另一种不使用 ggplot2 包来绘制此图的方法吗?

Sector <- rep(c("S01","S02","S03","S04","S05","S06","S07"),times=7)
Year <- as.numeric(rep(c("1950","1960","1970","1980","1990","2000","2010"),each=7))
Value <- runif(49, 10, 100)
data <- data.frame(Sector,Year,Value)
data

ggplot(data, aes(x=Year, y=Value, fill=Sector)) + 
  geom_area(stat="identity")

在ggplot中有很多改变色标的方法。

您可以通过以下方式准确指定所需的颜色:

Sector <- rep(c("S01","S02","S03","S04","S05","S06","S07"),times=7)
Year <- as.numeric(rep(c("1950","1960","1970","1980","1990","2000","2010"),each=7)) 
Value <- runif(49, 10, 100) 
data <- data.frame(Sector,Year,Value)
data

ggplot(data, aes(x=Year, y=Value, fill=Sector)) + geom_area(stat="identity") +
  scale_fill_manual(values = c("black","blue","gray","orange","tan","purple","darkgray"))