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

Question

我是 R 的新手。我不能在图表中放置图例，我的代码有问题，我试图在这个图上放置图例。 我做了一个散列，在我的模型上放了一些颜色，但现在我不知道如何在它上面放正确的图例。 这就是我所做的：

myhash<-c(a="green",b="pink",c="blue",d="purple",e="orange",f="brown",g="yellow",
          h="black",i="gray") 
mycolor<-myhash[df$category]
plot(df$growth,df$tannin,col=mycolor,cex=1,pch=16,xlab="Crecimiento",ylab="Taninos", main = "Modelo lineal Taninos vs Crecimiento")

我试着把这个传说放在这样的地方：

legend("topright",c(df$tannin),fill=c("green","pink","blue","purple","orange","brown","yellow",
          "black","gray"))

请让我知道如何修复它，我是 R 的初学者。另外，我不能使用任何库。 提前致谢。

Answer 1

问题似乎是没有图例（函数legend的参数，而不是函数）在填充颜色旁边显示为文本。
要使用命名参数， legend = unique(names(mycolor))解决了这个问题。

set.seed(2020)
df <- data.frame(category = rep(c("a","b", "c", "d"), 4),
                 growth = 1:16, tannin = cumsum(rnorm(16)))

myhash <- c(a = "green", b = "pink", c = "blue", d = "purple") 
mycolor <- myhash[df$category]

plot(df$growth, df$tannin, col = mycolor, cex = 1, pch = 16,
     xlab = "Crecimiento", ylab = "Taninos", 
     main = "Modelo lineal Taninos vs Crecimiento")

legend("topright", legend = unique(names(mycolor)), fill = mycolor)