R图例未按点显示颜色

Question

因此，我在R中作了一个绘图，用许多不同的颜色指示该点属于我23个类别中的哪个类别。 点的颜色通过矢量添加（stratumcol，这是一个具有23个级别的因子）。

当我添加图例时，尝试让其显示颜色及其类别，似乎它们不匹配（使用ordihull测试，请参见下图）。

这是我的情节代码：

plot(pca_nmdsscores, type = "n")
points(pca_nmdsscores, col=stratumcol, cex=1.5, pch = 15)
legend("right","top",levels(stratumcol),cex=.8, col = as.numeric(stratumcol), pch =15, lty = 0) # pch = stratumcol
ordihull(pca_nmdsscores, groups = stratumcol,draw = "polygon", col ="purple",label = T, show.groups = "LateMoistRich")
ordihull(pca_nmdsscores, groups = stratumcol,draw = "polygon", col ="blue",label = T, show.groups = "MidWetPoor")

在这里我的Rplot应该可见。 如您所见，我的类别“ MaleMoistRich”将点与淡粉色连接起来，但是在图例中，该颜色称为“ MidMoistRich”。

连接中间的蓝色点的“ MidWetPoor”也是如此，在图例中此颜色表示“ LateMoistPoor”。

我该如何解决这个问题？

我尝试寻找解决方案，但没有遇到任何可以解决的问题-包括“独特”（不会更改任何内容，因为我的调色板已定义为23种颜色，因此无论如何都无需回收这些颜色）

[R中的图，显示图例和点颜色] [1]

好的-因为我是新手，所以无法上传自己的地块图片...

但是请在此处查看： http : //i.stack.imgur.com/pzn2y.png

/谢谢

编辑：解决方案是不使用我的水平！ 不在图例=级别（stratumcol）中，也不在col =级别（stratumcol）中。 Richard和DeveauP建议级别可能是问题。

这就产生了一个新问题：我的腿部显示了整个因素，而不仅仅是其中的水平（而是颜色对应于正确的点颜色，这是最初的问题）。

通过使用“ unique（）”而不是“ levels（）”解决了这个新问题。

legend("Right","top",legend=unique(stratumcol), cex=.8, col = unique(stratumcol), pch=15, lty=0)

我找到了解决方案

Answer 1

尝试

legend("right","top",legend = levels(stratumcol),cex=.8, col = levels(stratumcol), pch =15, lty = 0)