Dodged Bar Plots в ggplot - определение цвета по оси X в отличие от заливки

Question

Возникли некоторые проблемы с уклоненными гистограммами в ggplot. По сути, единственный способ уклониться от них - это изменить заливку на другую переменную, но я хочу закрасить парные графики тем, что они находятся на оси х. Включили фиктивную картину того, чего я пытаюсь достичь.

Я не уверен, что здесь что-то упущено.

Заранее большое спасибо!

Answer 1

Один трюк - использовать другую, не очень полезную переменную, чтобы уклонение происходило В приведенном ниже примере я использую цвет, чтобы отделить их, но при этом все они имеют одинаковый цвет:

X = data.frame(Year=factor(rep(c(2016,2018),3)),
Sales=runif(6),Brand=rep(c("Toyota","Skoda","Ford"),each=2))

ggplot(X,aes(x=Brand,y=Sales,fill=Brand)) + 
geom_col(aes(col=Year),position="dodge",show.legend=FALSE) + 
scale_color_manual(values=c("black","black")) + 
geom_text(aes(label=Year,y=0.5*Sales),position=position_dodge2(1),angle=90)