R ggplot：多层x轴

我正试图制作一个盒状胡须图，显示一段时间内鸡蛋的数量，将一年分为旱季和雨季。下面的图表几乎就在那里，但它没有继续月份序列，而是重新开始雨季的月份名称。应该是十一月到五月，然后是六月到十月。我错过了什么

   ggplot(data=eggcounts3, mapping=aes(x=monthegg, y=Eggs, color=as.factor(monthegg)))+
      geom_boxplot(width=0.9)+
      ylim(0,12001)+
      xlab("Time of Year")+
      guides(color=FALSE)+
      ylab("Fecal Egg Count")+ 
      scale_x_discrete(labels=c("Nov","Dec","Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct"))+
      facet_wrap(~NewSeason, strip.position = "bottom", scales = "free_x") +
      theme(strip.background = element_blank(),strip.placement = "outside",axis.text.x = element_text(face="bold"))

---

您可以使用

dput

发布数据样本吗？您不需要

缩放x_离散
。相反，请确保
monthegg
是具有所需顺序的因素。在运行绘图代码之前，执行
eggcounts3$monthegg=因子（eggcounts3$monthegg，levels=month.abb[c（11:12,1:10）]）
（
month.abb
是一个内置向量）。然后，在绘图中，
facet\u wrap（~NewSeason，strip.position=“bottom”，scales=“free\u x”，space=“free\u x”）+
我改为“瞥见”——我不能在这里发布全部原始数据<代码>一瞥（eggcounts3）观察：788个变量：4$Eggs 3625、50、1425、925、2700、50、2875、750、2150、0、1125、7500、$季节“春”、“夏”、“夏”、“秋”、“秋”、“冬”新闻季节雨，雨，雨，雨，雨，干，干，干，干，干，Ra…$蒙太格5，6，8，9，10，11，1，2，3，3，5，5，6，1，2，3，5，6，8，9，…>levels（eggcounts3$monthegg）[1]“11”“12”“1”“2”“3”“4”“5”“6”“7”“8”“9”“10”
它抱怨空格=“free\u x”，所以我删除了该位。现在，这产生了一个更接近我想要的图形（月份用数字正确标记），但我希望使用月份缩写，以便更方便地交流（因此我的scale_离散线）。现在，将数据从数字月份重新编码为字符/因子月份似乎是最容易的。谢谢你的帮助！使用
dput（eggcounts3）
发布数据结构，也不要将其作为注释发布。编辑你的问题并把它放在那里。