如何最大化ggplot条形图的宽度？

Question

假设我使用了ggplot，它可以很好地退出。代码如下：

female<-subset(fl_Estonia,Sex=="F"  )
roles<-ggplot(female,aes(Role,fill=Role))+
  geom_bar(col=rainbow(length(table(female$Role))))
roles+theme(axis.text.x = element_text(angle = 90,hjust=1),legend.position="none")

输出如下图所示：

关键是，情节有点浓缩，所以我想使用图像右侧的空白区域？

Answer 1

例如，您可以在width = ...中增加条形（position_dodge(width = ...)）之间的宽度（geom_bar()）和/或：

...+ geom_bar(width = 1, position = position_dodge(width = 1)) +

在你的情况下：

female<-subset(fl_Estonia,Sex=="F"  )
roles<-ggplot(female,aes(Role,fill=Role))+
  geom_bar(width = 1, position = position_dodge(width = 1),col=rainbow(length(table(female$Role))))
roles+theme(axis.text.x = element_text(angle = 90,hjust=1),legend.position="none")

[！] 此解决方案无法在RMarkdown或Shiny中正常运行！由于你没有准确指出它在哪个环境中，我认为你只是想得到这个情节。