将方框图和条形图在R中对齐

我对R很陌生。为了我的研究，我需要将我在16个样带中发现的动物数量绘制成箱线图和条形图。我想使用mfrow将两个绘图合并为一个图像。x轴显示了我在现场做过几次样条的日期。箱线图显示了停止之间的变化。条形图显示了3个分类群在特定日期内的总体活动。 这些图很好，但我无法将它们对齐，以便日期1的箱线图低于同一日期的条形图。 我使用了箱线图的at参数来对齐它们，但无法将条形图与箱线图中使用的设置对齐，因为它不使用at，而是使用宽度和空间

par(mfrow=c(2, 1))

barplot(t(test), width=0.8,col=c("darkgoldenrod1","black","antiquewhite"),ylim=c(0,250),xlim=c(0.5,18),space=c(0.3,0.3,0.3,0.3,1.3,0.3,0.3,0.3,1.3,0.3,0.3,0.3,0.3,0.3,0.3,0.3))

boxplot(x~y,xlim=c(1,18),at =c(1,2,3,4, 6,7,8,9, 11,12,13,14,15,16,17,18),outcex=1)

有没有办法把这两个情节放在一起，使它们相互适合

编辑： 我在宽度、xlim和空间方面做了一些调整，但肯定有更好的方法

编辑2： 这是我创建的当前绘图

---

14个值为0.2，其他2个值为1.4。这一次，一个表格可以处理这些数据。@NickCox这不是数据，而是条之间的间距。OP不显示数据，即测试。现在的问题似乎只是关于编程，如果提供一个可复制的例子，它会更适合堆栈溢出。@Roland感谢您的更正；我看得不够仔细，无论如何R不是我的日常软件。我早些时候投票决定关闭。堆叠的条形图似乎显示了三个分类群的数量。你是如何得到几个方块图的数字的？我应该再指定一点。x轴显示了我在现场做过几次样条的日期。箱线图显示了停止之间的变化。条形图显示了3个分类群在特定日期内的总体活动