R、y軸の水平バープロットに異なる縮尺でテキストを追加しますか？

Question

私は、各バーと同じ高さで水平バープロットの右側にテキストを追加しようとしていますが、text（）とaxis（）の両方がそれぞれの高さでこれをプロットしていないようですバー。

ここではどのようにスケーリング作業ここでは、同様のbarplotこれら二つのオプションのどちらが適切に揃える

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)) 

ですか？棒の中点：barplotのドキュメントをchackingことで

axis(4, at=seq(1,10,1), labels=seq(1,10,1)) 
text(1.1, seq(1,10,1), labels=seq(1, 10, 1)) 

Answer 1

は、あなたはそれが見えないの戻り値を持っていることがわかります。それらを使ってプロットに追加情報を追加することができます。

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