X轴与轴重叠的刻度标记标签

Question

您好，所以我试图在ggplot2中制作一个简单的堆叠条形图，而且我似乎无法让我的一个轴刻度标记标签不与轴本身重叠。

由于我需要一些斜体，所以我不得不创建自己的标签

mylabels <- c("Initial", "Control", 
              expression(paste(italic("D.magna"))), 
              expression(paste(italic("D.pulex"))), 
              "Grazer \n dilution")  

所以现在看来​​，有突破的人与我希望和期望的方式并不一致。 我试图通过公平和公正的态度来解决此问题，但这些并不能解决我的问题。

这是我用来制作图形的代码（图中未包含传说）

ggplot(FGMX14, aes(x=factor, y=RelativeAB, fill=Genus)) + 
  geom_bar(stat="identity", size=0.5, color="black") +
  scale_x_discrete (labels=mylabels)+
  ylab(expression(paste("Relative Abundance (%)")))+
  theme(axis.text.x=element_text(vjust=1, hjust =0.5))+
  theme(axis.title.x=element_blank()) +
  theme(legend.position = "bottom", legend.key.size = unit(0.5,"line"))+
  theme(legend.direction = "horizontal")+
  scale_fill_manual(values = colorscyano, labels=labscyano, breaks=breakscyano)+
  theme(legend.title=element_blank())+
  guides(fill=guide_legend(ncol=2))

有人可以帮我弄清楚我出了什么问题吗？

谢谢， 梅根