назначение цвета с использованием функции изображения

Question

Я хочу, чтобы указанные c числа и определенные c цвета были связаны в графиках.

Следующий код

z <- matrix(1:5, 5, 5)
image(z, col=c("red","blue","pink","yellow","black"))

создает нужный график,

, но

z[z < 4] <- 4
image(z,col=c("red","blue","pink","yellow","black"))

назначит "красный" номеру 4.

Я хочу, чтобы назначение цвета осталось прежним.

Answer 1

Решение 1

Аргумент breaks указывает точки останова для цветов и должен иметь одну точку останова больше, чем цвет, и быть в порядке возрастания.

image(z, col = c("red", "blue", "pink", "yellow", "black"), breaks = 0:5)

Приведенный выше код означает отображение значений в пределах

• ( 0, 1 ] на красный
• ( 1, 2 ] до синий
• ( 2, 3 ] до розовый
• ( 3, 4 ] до желтый
• ( 4, 5 ] до черный

---

Решение 2

Использование индексов цветов.

color <- c("red","blue","pink","yellow","black")
image(z, col = color[z])