Попытка сохранить заполненные бары в граненом заговоре

Question

Не уверен, что я здесь делаю не так. У меня есть этот сюжет:

ggplot(data.PE5, aes(ybands,fill=factor(decide))) + geom_bar(position="dodge") 

, который производит:

Тогда я хочу учесть фактор, создавая два сложенных графика с уклоненными цветными полосами

ggplot(data.PE5, aes(ybands,fill=factor(decide))) + geom_bar(position="dodge") + 
facet_grid(~group_label) 

Однако я теряю основанную на факторе окраску, которую хочу сохранить:

Answer 1

Если вы переместите fill в geom_bar, оно должно работать. Как:

ggplot(data.PE5, aes(ybands)) + geom_bar(aes(fill=factor(decide)),position="dodge") + facet_grid(~group_label)

Причина в том, что ggplot2 строит графики как грамматику (я думаю).