R-如何从数字矢量自动化颜色向量

Question

我有一个数字向量，

> z <- c("cat","cat","dog","dolphin","cat")
> z <- as.numeric( as.factor(z))
> z
[1] 1 1 2 3 1

由此我如何自动化一些颜色的pallette？例如，c("red","red", "blue", "green", "red")或任何可用的颜色pallete。

我尝试使用rainbow(length(z))，但这不起作用。

Answer 1

我认为您的意图是，如果z中的值相同，则颜色是相同的。您想要的是：

z <- c("cat","cat","dog","dolphin","cat")
rainbow(length(unique(z)))[as.numeric( as.factor(z))]
[1] "#FF0000FF" "#FF0000FF" "#00FF00FF" "#0000FFFF" "#FF0000FF"

这为z的每个独特值生成了不同的颜色，但是当值相等时，它们获得相同的颜色。