3 разных цветовых региона на уровне

Question

Попытка построить эту матрицу таким образом, чтобы отрицательные значения были красными, 0 - голубыми, а положительные значения - зелеными.

m <- matrix(c(0,0,-1,-2,0,0,1,0,1,3,3,3,-3,0,0,2),nrow = 4)

levelplot(m,at=c(-3,0,3),col.regions=c("red","blue","green"),xlab = xlab.a, ylab="", colorkey = FALSE, panel = function(...) {
  panel.fill(col = "blue")
  panel.levelplot(...)
})

Answer 1

Вот еще один обобщенный c способ, использующий логические сравнения:

levelplot((m>=0) + (m > 0),at=c(-0.1, 0:2),col.regions=c("red","blue","green"), xlab = "", ylab="", colorkey = FALSE, panel = function(...) {
  panel.fill(col = "blue")
  panel.levelplot(...)
})

Answer 2

m <- matrix(c(0,0,-1,-2,0,0,1,0,1,3,3,3,-3,0,0,2),nrow = 4)

levelplot(m,at=c(-3,-1,0,3),col.regions=c("red","blue","green"), xlab = "", ylab="", colorkey = FALSE, panel = function(...) {
  panel.fill(col = "blue")
  panel.levelplot(...)
})