Я пытаюсь построить гистограмму с процентами по оси Y и категориальной переменной с 6 категориями по оси X.Гранение выполняется другой категориальной переменной, которая имеет 7 уровней.Я хочу добавить разные цвета к столбцам, представляющим 6 уровней переменной x в каждом фасете.
Я попытался написать этот код:
ggplot(data= choices, aes(x=pre2_Altdrinks)) +
geom_bar(aes(y = (..count..)/sum(..count..)), alpha=0.75) +
facet_grid(~Residence) +
scale_fill_brewer(palette="Dark2")
labs(title = "Alternate drinks protective behaviour across different residence status",
x = "alternate drinks", y= "Percentage")
Он генерирует этот график без цветов: 
Тогда я попробовал этот код:
ggplot(data= choices, aes(x=pre2_Altdrinks,fill= pre2_Altdrinks )) +
geom_bar(aes(y = (..count..)/sum(..count..)), alpha=0.75)+
facet_grid(~Residence) +
scale_fill_brewer(palette="Dark2")
labs(title = "Alternate drinks protective behaviour across different residence status",
x = "alternate drinks", y= "Percentage")
Это дает мне:
Error: Continuous value supplied to discrete scale