オーバーレイRにおいてRプロット

Question

の凡例中の2つの円、私は同様に凡例アイテムを作成することができ...

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

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

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」のシンボルを作成しようとしている場合は

Answer 1

、あなたが現在使用している他のlegendの引数に加えpt.bgとpt.lwdのバリエーションを使用する必要があります（例えばlty、pch、col、および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)