如何从数字向量自动生成颜色向量

Question

我有一个数字向量，

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

从这里开始，如何自动生成一些彩色调色板？ 例如，c("red","red", "blue", "green", "red")或任何颜色托盘可用。

我尝试使用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的每个不同值生成不同的颜色，但是当值相等时，它们会得到相同的颜色。