r и построить растр на основе уникальных значений в таблице поиска - PullRequest
0 голосов
/ 13 февраля 2019

У меня есть растр, который я хотел бы построить.Каждое уникальное значение соответствует определенной символике (то есть значению, имени, цвету (rgb & hex)), найденным в справочной таблице (lut).Как мне построить растр, ограничивающий вывод на основе лютни?Кроме того, легенда должна иметь отдельные значки для каждого значения.

##Here are the first 4x lines from my lut
value    name    r    g    b    hex
1        abc     209  255  115  #D1FF73
22       def     196  189  151  #C4BD97
550      ghi     115  223  255  #73DFFF
980      jkl     204  204  204  #CCCCCC


##Code
x <- raster(xyz.asc)
unique.x <- data.frame(unique(x))
names(unique.x) <- c("value")

lut <- read.csv("lut.csv")
lut <- lut[order(lut$value), ]
##subset lut based on unique values found within x
lut <- lut[lut$value %in% unique.x$value, ]

##here is where I am lost (or perhaps earlier too)
plot(x, breaks=lut$value, box=F, axes=F)

##the code above works, but:
#i. when I add in "col=lut$hex" I get the error "Error in rgb(tx, tx, tx,
#maxColorValue = max) : color intensity 16, not in [0,1]"; and,
#ii. the legend is a gradient with overlying labels - not ideal
...