2013-04-14 54 views
15

我有一個時間系列,用黑線表示,一個用紅色曲線表示。然後我有單個點,它們在R中具有8的pch符號。這些是星星。請參閱下面的情節: stars在R曲線圖例中添加pch符號

目前,我有以下的傳說:

legend("bottomleft", 
legend=c("log loss","daily VaR","exceedance"), 
bty = "n",lwd=2, cex=1.2,y.intersp=1.4, col=c("black","red","blue"), lty=c(1,1,1)) 

但我不希望有圖例的超越藍線,但只是明星中的情節。我必須使用pch = 8。我只想擁有傳奇中的明星,而不是擁有一條線的明星。所以不是這些解決方案:R legend issue, symbols of points are masked by lines

回答

26

試試這個。您將lty設置爲僅顯示前兩行,而pch僅顯示最後一個點。

plot(1:10, rnorm(10) * 1:10) 
legend("bottomleft", legend = c("entry1", "entry2", "something cpl different"), bty = "n", 
     lwd = 2, cex = 1.2, col = c("black", "blue", "red"), lty = c(1, 1, NA), pch = c(NA, NA, 8)) 

enter image description here