Блог

Я хотел бы изменить определенные цвета (отличные от радужных по умолчанию) для каждого столбца «Сектор» в приведенном ниже коде

Я читал, что 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"))