Я пытаюсь создать 3 графика для категориальных и категориальных переменных.Я не вижу никакой легенды для разных категорий переменных C1, C4, C5.Также бары серые.Набор данных содержит информацию о 9 категориальных переменных и 6 числовых переменных.С1, С4, С5 имеет 2,4,3 категории соответственно.Hired (1,0) - это переменная, показывающая, будет ли кандидат принят на работу или нет.
install.packages("Rmisc")
library(Rmisc)
p1<-ggplot(hireouti, aes(x = Hired, fill = C1)) + geom_bar(position = 'stack', show.legend=TRUE)
p2<-ggplot(hireouti, aes(x = Hired, fill = C4)) + geom_bar(position = 'stack', show.legend=TRUE)
p3<-ggplot(hireouti, aes(x = Hired, fill = C5)) + geom_bar(position = 'stack', show.legend=TRUE)
multiplot(p1,p2,p3, cols = 3)
Первая визуализация ниже - это вывод, который я получаю.Я хотел бы получить визуализацию, подобную второй ниже.
![Output with no legend](https://i.stack.imgur.com/54fp0.png)
![desired output](https://i.stack.imgur.com/RDIyu.png)
Iсмог воспроизвести визуализацию с легендой.
Я выполнил приведенный ниже код, и C1, C4, C5 были числовыми.Я пытался преобразовать в фактор.
p1<-ggplot(hireouti, aes(x = Hired, fill = factor(C1))) + geom_bar(position = 'stack', show.legend = TRUE)
p2<-ggplot(hireouti, aes(x = Hired, fill = factor(C4))) + geom_bar(position = 'stack', show.legend = TRUE)
p3<-ggplot(hireouti, aes(x = Hired, fill = factor(C5))) + geom_bar(position = 'stack', show.legend = TRUE)
multiplot(p1,p2,p3, cols = 3)