在R、y轴上以不同比例向水平条形图添加文本？

我试图在水平条形图的右侧添加一些文本，这些文本的高度与每个条形图的高度相同，但是，text（）和axis（）似乎都不会在每个条形图对应的高度处进行打印

这是一个类似的条形图

x <- runif(10, 0,1)
y <- matrix(c(x, 1-x), nrow=2, ncol=10, byrow=TRUE)
barplot(y, horiz=TRUE, beside=FALSE, names.arg=seq(1,10,1), las=1, xlim=c(0, 1.2))

---

通过查看

条形图

的文档，可以看到它有一个不可见的返回值：条形图的中点。您可以使用这些来向绘图添加其他信息

x <- runif(10, 0,1) 
y <- matrix(c(x, 1-x), nrow=2, ncol=10, byrow=TRUE) 
bp <- barplot(y, horiz=TRUE, beside=FALSE, names.arg=seq(1,10,1), las=1, 
              xlim=c(0, 1.2)) 
text(x, bp, signif(x,2), pos=4)
bp

---

x谢谢，太好了。值一个数字向量（或矩阵，当next=TRUE时），比如mp，给出绘制的所有条形中点的坐标，用于添加到图形中。我从条形图帮助文件复制了文本为什么删除了昨天的图片？使用图形有助于理解。
x <- runif(10, 0,1) 
y <- matrix(c(x, 1-x), nrow=2, ncol=10, byrow=TRUE) 
bp <- barplot(y, horiz=TRUE, beside=FALSE, names.arg=seq(1,10,1), las=1, 
              xlim=c(0, 1.2)) 
text(x, bp, signif(x,2), pos=4)
bp