你這樣做的方式是正確的。如果你想檢查確實顏色對應於你的小組,你可以,例如這樣做的(這裏重複的例子):
set.seed(1)
a <- data.frame(Group=factor(sample(c("control","low","medium","high"),20,TRUE),
levels= c("control","low","medium","high")),
x=rnorm(20),y=rnorm(20))
col.list <- c("green","orange","brown","black")
palette(col.list)
pairs(a[,2:3], col=a[,1])
做什麼col=a[,1]
實際上是palette()[a[,1]]
(工作如果內容列的是一個因素或整數),所以讓我們來看看:
palette()[a[,1]]
[1] "orange" "orange" "brown" "black" "green" "black" "black" "brown" "brown" "green" "green" "green" "brown" "orange"
[15] "black" "orange" "brown" "black" "orange" "black"
table(a[,1], palette()[a[,1]])
black brown green orange
control 0 0 4 0
low 0 0 0 5
medium 0 5 0 0
high 6 0 0 0
你真的擔心的唯一的事情是,Indices[,1]
內容是一個因素,其水平以相同的順序排序爲對應的顏色列表。
您在'Indices'中的第一列應該是顏色名稱。有很多方法可以創建它。從「彩虹」開始。 –