r barplot 2系列在x轴上显示标签

Question

我的代码如下。我想在x轴上放置标签，但我收到以下错误。

如何在不在x轴上重复标记的情况下绘制标签？

我如何添加图例？

animal=c("a","b")
height=c(5,6)
weight=c(7,9)
bb=barplot(rbind(height,weight), col=c("darkblue","red"),beside = TRUE)
grid(lty=8,col="black")
axis(1,at=bb,labels=animal,las=2)