Ich benutze den folgenden Code, um ein Balkendiagramm zu erstellen:

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

Das Vorhandensein vonscale_color_manual scheint keinen Einfluss auf das resultierende Diagramm zu haben, es bleibt gleich, auch wenn ich @ entferscale_color_manual. Mein Datenrahmenfinal hat 10 Variablen und ich benutzemelt aufTime. Daher habe ich 9 Farben für den Plot verwendet. Der Datensatz selbst ist zu finden untHie.

Jede Hilfe hierzu wäre sehr dankbar.