如何在R中向绘图图添加图例

我用

col1

和

col2

数据制作了这个数据帧。我需要的是添加一个显示

col2

值的图例

df <- data.frame(col1 = c( 1, 2, 3,1,2,4,6,6),
             col2 = c( 4, 5, 6,4,5,6,4,6))

     mycolors = c('red','yellow','blue')
plot(df[c("col1", "col2")],col=mycolors)
legend(1, 95,legend=c("col2"),
   col=c("red", "blue"), lty=1:2, cex=0.8)

---

df您有四个小错误：


图例的位置在网格之外。请尝试
4.5,6.0
legend=
应该是标签列表，可能是唯一的。使用
unique（df$col2）
col=
应该是相同的颜色。使用
col=mycolors
您应该在绘图中添加点的符号。即-
pch=1

总而言之：

legend(4.5, 6.0, legend = unique(df$col2), col=mycolors, pch = 1)

您正在
y=95
处绘制图例，但您的可见绘图仅进入
y=6
。