2016-11-02 16 views
0

は、私はこのフォームバープロットをRでX軸を共有できますか? Rで

y = rnorm(500) 
y = matrix(y,100,5) 
y.means = abs(apply(y,2,mean)) 
barplot(y.means, names.arg=1:5) 

私はこれらが同じx軸を共有したいのbarplotsのn個を持っています。どのように余分なライブラリを使用せずに行われますか?詰め、これは可能であるbarplot位置を保存を利用して少しで

+1

'barplot(マトリックス(y.means、NcoI部位= 1))'?そうでない場合は、「同じx軸を共有する」という意味を説明してください。 – r2evans

+0

同じx軸を共有すると、n個の棒グラフが図の中で互いに垂直に直接配置され、その結果、下の棒グラフはその横軸にラベルが付きます。これらのラベルは、著者が同じ量を表すために水平に並べられたすべての棒を解釈することを意図しているという意味で、上記のすべての棒グラフ間で共有されています。 –

+0

'par(mfrow = c(2,1))'を使って)http://stackoverflow.com/a/36968624/3358272は動作しますか? – r2evans

答えて

1

vals <- cbind(y.means, newone=y.means) 
bp <- barplot(vals, beside=TRUE, plot=FALSE) 
barplot(unname(vals), beside=TRUE, names.arg=c(1:5, 1:5)) 
axis(1, at=colMeans(bp), labels=colnames(vals), line=2, lty=0) 

enter image description here

+0

それはy軸を共有することになります。 x軸がy軸の代わりに共有されるようにこの回答を修正できますか?ありがとう –