Как изменить мои коды ggplot2 так, чтобы столбцы были рядом друг с другом, а не сложены друг над другом?

Question

У меня есть следующие ggplot2 коды, работающие в R. Мне нужно настроить коды так, чтобы столбцы каждого значения FY были рядом друг с другом, а не были сложены.

Мои коды выглядят следующим образом:

 p1 <- ggplot(dff3, aes(x=Gender, fill=FY)) + ggtitle("Gender") + 
       xlab("Gender") +
       geom_bar(aes(y = 100*(..count..)/sum(..count..)), width = 0.5) + 
       ylab("Percentage") + 
       coord_flip() + 
       theme_minimal() +
theme(axis.text=element_text(size=12),axis.title=element_text(size=14,face="bold"))

 p1

Сюжет выглядит так: наподобие этого:

Answer 1

Вы можете использовать position_dodge() в пределах geom_bar(). Вот пример использования mtcars набора данных:

library(tidyverse)

ggplot(mtcars, aes(x=factor(am), fill=factor(vs))) + 
  ggtitle("Gender") + 
  xlab("Gender") +
  geom_bar(aes(y = 100*(..count..)/sum(..count..)), width = 0.5, position = position_dodge()) + 
  ylab("Percentage") + 
  coord_flip() + 
  theme_minimal() +
  theme(axis.text=element_text(size=12),axis.title=element_text(size=14,face="bold"))