Scale_color_manual não está funcionando conforme o esperado
Estou usando o seguinte trecho de código para criar um gráfico de barras:
temp1 <- melt(final,id='Time')
p <- ggplot(temp1, aes(x=Time, y=value, fill=variable)) +
geom_bar(stat="identity", position = "fill") +
scale_y_continuous(labels = percent_format()) +
ggtitle('Cost Structure Breakdown') + theme_bw() + ylab('Percent Spread') +
theme(panel.grid.minor.x = element_blank(),
panel.grid.minor.y = element_blank(),
panel.grid.major.x=element_line(color='grey90',linetype='dashed'),
panel.grid.major.y=element_line(color='grey90',linetype='dashed'),
plot.title=element_text(size=20),
axis.text=element_text(size=15),
legend.text=element_text(size=15),
legend.key=element_blank(),
legend.title=element_blank()) +
scale_color_manual(values=c("#a6cee3","#1f78b4","#b2df8a","#33a02c","#fb9a99","#e31a1c","#fdbf6f","#ff7f00","#cab2d6"))
p
A presença descale_color_manual
parece não afetar o gráfico resultante, permanece o mesmo, mesmo que eu removascale_color_manual
. Meu dataframefinal
tem 10 variáveis e eu estou usandomelt
emTime
. Portanto, usei 9 cores para o enredo. O próprio conjunto de dados pode ser encontradoaqui.
Qualquer ajuda sobre isso seria muito apreciada.