圖例的顏色調用字典R

我有一個情節，繪製點與特定的符號和顏色。我希望我的傳說能夠顯示與情節中的顏色和符號完全相同的顏色和符號。我可以手動執行此操作，但是我有超過50個圖形生成，並且數據將被不斷更新，因此我想自動化該過程。我試圖創建一本字典，並希望搜索字典。如果在levels(Color_test)中找到該值，則將圖例中的符號與字典中列出的相同。我的傳說代碼如下：圖例的顏色調用字典R

legend(legend_X, legend_Y, 
    xjust=x_adj, yjust=y_adj, 
    levels(Color_test), 
    col=Labels.col, 
    pch=Labels.sym, 
    horiz=FALSE)

來源

2012-09-07 user1655130

一個簡單的例子可以幫助我們理解你是如何設置這個設置的。目前我們會在黑暗中進行「刺戳」。 –

可能是你正在尋找的是某種與字典合併您的數據。下面是它是如何只用顏色做，因爲它僅僅是一個例子

data <- data.frame(type = sample(letters[1:3],20,replace=T), 
        x = runif(20), 
        y = runif(20)) 
dict <- data.frame(type = letters[1:4], 
        color = c("red","green","blue","black")) 
plot(data$x, data$y, col = merge(data,dict)$color) 
legend("topleft",legend=dict$type, col=dict$color, pch=1)

輕鬆，你可以修改的傳說所以這是甫一顯示實際使用的顏色。

data_dict <- merge(data,dict) 
plot(y~x, col=color, data=data_dict, pch=as.vector(type)) 
legend("topleft",legend=unique(data_dict$type), col=unique(data_dict$color), pch=1)

來源

2012-09-07 16:16:56

圖例的顏色調用字典R

回答

相關問題