小平面网格 - 条间距和面板尺寸

facet grid - spacing between bars and panel size

这是我的第一个问题,我尽量描述我的问题。 (很抱歉,如果我没有成功的话)

我想在使用 facet_grid 的同时在 ggplot 中制作条形图。

plot1<-ggplot(data2,aes(x=fc4mean,y=Fraktion,fill=methode))+
  facet_grid(~Standort, scales="free_y",)+
    geom_barh(stat="identity",aes(fill=methode), position=position_dodge2(),width = 0.3)+
  theme_bw()+
  theme(axis.text.x = element_text(hjust = 1))+
  scale_fill_brewer(palette = "Greys",direction=-1)+
  scale_color_brewer("Black")+
  theme(legend.title=element_blank())+
  ylab("fraction")+
  guides(colour = guide_legend(reverse=T))+
  geom_errorbar(aes(xmin=fc4mean-fc4sd, xmax=fc4mean+fc4sd),position=position_dodge2(),width=0.3)

它有效,但标准设置使条形图变得又大又难看。所以我决定将条形宽度设置为 0.3。问题是酒吧组彼此远离。所以我试图减少间距。

我尝试了很多不同的方法,例如

的解决方法
position=position_dodge()

scale_y_discrete(expand = c(0, 2))+

删除 y 轴上 2 个因子刻度之间的间距。这行得通,但是我在面板的顶部和底部有大量空 space 。

我试图用

压缩剧情
theme(plot.margin = unit(c(5,0,5,0), "cm"))

这根本没有帮助。 因为我不愿意放弃并合并绘图中的绘图,所以我希望有人知道如何处理条的宽度、条之间的间距以及小平面网格中面板的间距。

希望得到一些好的意见,干杯:)

在您的评论的帮助下,我能够使用命令

创建一个像样的情节
scale_y_discrete(expand=expansion(c(0,2)))
position=position_dodge()
width = ()

并通过调整图的纵横比windows。 谢谢