R 标签条形图';x轴上的s组成员

R 标签条形图';x轴上的s组成员,r,ggplot2,bar-chart,R,Ggplot2,Bar Chart,我正在尝试使用Rggplot2包在x轴上生成两种标签 一个是基于x轴的值(我已经做了),另一个是基于pathId(显示在条形图上)。目前,我正在使用geom\u text将它们放在条形图中 有没有办法将它们放在x轴下? 我在这里看到了一些问题,但它们基于堆栈栏或使用x=interaction(var1,var2)。但这样每个酒吧都有相同的距离,这不是我想要的 以下是我通过summarySE生成的数据: pathId nodeId N value sd

我正在尝试使用
R
ggplot2包在x轴上生成两种标签

一个是基于x轴的值(我已经做了),另一个是基于
pathId
(显示在条形图上)。目前,我正在使用
geom\u text
将它们放在条形图中

有没有办法将它们放在x轴下?

我在这里看到了一些问题,但它们基于堆栈栏或使用
x=interaction(var1,var2)
。但这样每个酒吧都有相同的距离,这不是我想要的

以下是我通过
summarySE
生成的数据:

          pathId nodeId   N    value        sd        se       ci  
1  least similar      0 216 159.7242  96.74438  6.582622 12.97474  
2  least similar      1 165 146.0958 123.27584  9.597011 18.94963  
3   less similar      0 216 185.6628 149.27098 10.156604 20.01927  
4   less similar      1 152 152.0290 135.02925 10.952318 21.63958  
5        similar      0 216 179.3326 150.55189 10.243758 20.19105  
6        similar      1 141 163.1733 111.77780  9.413389 18.61077  
7   more similar      0 216 183.8146 123.51216  8.403938 16.56466  
8   more similar      1  90 179.3577 141.21904 14.885794 29.57775  
9   most similar      0 216 187.6143 107.80367  7.335111 14.45794  
10  most similar      1  61 184.9422 117.32353 15.021738 30.04795  
我使用的代码是:

ggplot(data=bar_data, aes(x=interaction(nodeId), y=value, order=pathId), fill="grey80",colour="grey80")+
geom_bar(stat="identity", position="dodge", fill="grey95", colour="black", show_guide=FALSE)+
geom_errorbar(aes(ymin=value-se, ymax=value+se, order=pathId), width=.15,
              colour="black", position=position_dodge(width=0.90))+
ylab("BM25 Score")+
xlab("Node")+  
scale_x_discrete(breaks= c(0,1),
                 labels=c("BM25(Node0, Node1)","BM25(Node1, Node2"))+
geom_text(data=bar_data, aes(label=pathId, y=30),position=position_dodge(width=0.9),angle=75)+
theme(legend.title=element_text(size=14), legend.text=element_text(size=12))+
theme_bw()+
theme(axis.line = element_line(colour = "black"),
      panel.grid.major = element_blank(),
      panel.grid.minor = element_blank(),
      panel.border = element_blank(),
      panel.background = element_blank())
这张图就是我得到的。

这就是我想要的,我还希望组成员的标签可以旋转,这样我就可以为每个成员写更长的字符串


这可能有帮助这也可能有帮助:[还有这个:[@Ananta谢谢你的帮助,我尝试过这个解决方案,但我得到了
错误:离散值提供给连续刻度