2016-04-15 22 views
1

の凡例中の2つの円、私は同様に凡例アイテムを作成することができ...オーバーレイRにおいてRプロット

enter image description here

Iデータが赤色またはオレンジ外側円で覆わ、赤い点としてプロットしましたこれらの外側の円のサイズは属性を表し、外側の円の色は属性を表します。伝説でそれをどのように繰り返すことができますか?

enter image description here

は、これまでのところ、私は唯一の伝説を抱えている...

legend("topleft", 
    legend = c("elevation of centerline", "gradient", "boulders", "boulders in steps", "boulders not in steps"),  
    lty=c(1,1,0,0,0), pch=c(NA, NA, 19, 19,19), col=c("black", "gray", "red", "orange", "green"), 
    pt.cex=c(0.8, 0.8, 0.8, 2, 2) 
) 

は私が第三の要素にベクトルを与えることを試みた例

pch=c(NA, NA, c(19, 19), c(19,19)) 

運がありません。あなたは、「項目A」と「アイテム・B」のシンボルを作成しようとしている場合は

+0

あなたはすでに試した何を? Ggplotはこれを行うことができます。 – Heroka

答えて

0

、あなたが現在使用している他のlegendの引数に加えpt.bgpt.lwdのバリエーションを使用する必要があります(例えばltypchcol、およびpt.cex)。以下、次の例を使用し、これらのパラメータが互いに対話方法を確認するためのコードを調整します

x=seq(1,10,1) 
y<-seq(5,50,5) 
z<-rep(c(1:2),5) 
df<-data.frame(x,y,z) 
df$z<-factor(df$z) 

plot(y~x,data=df,type="l",lty=1,lwd=1,col="grey60") 
points(y~x,data=df[df$z==1,],pch=16,col="orange",cex=df$x[df$z==1]) 
points(y~x,data=df[df$z==1,],pch=16,col="red",cex=1) 
points(y~x,data=df[df$z==2,],pch=16,col="green",cex=df$x[df$z==2]) 
points(y~x,data=df[df$z==2,],pch=16,col="red",cex=1) 

legend("topleft",legend=c("Item A","Item B"),pch=c(21,21),col=c("green","orange"), 
     pt.bg=c("red","red"),pt.lwd=c(6,6),lty=c(0,0),pt.cex=c(2,2),cex=1) 

enter image description here

+0

これは解決策です。ちょっとハッキリですが、この特定のケースでうまくいきます!ありがとう。 – agoldev