从Levelplot中删除rigth栏

Question

我试图从水平图中删除右边的条形图，即用颜色表示刻度的图形。 我不知道是否有某种方法可以裁剪图表或创建一个无法打印的自定义函数。

这是一个简单的级别图：

  data(mtcars)
  cars.matrix <- as.matrix(mtcars[c(2:8)])
  cars.corr <- cor(cars.matrix)
  levelplot(cars.corr)

Answer 1

您只需将colorkey=FALSE添加到levelplot函数。

require(lattice)
data(mtcars)
cars.matrix <- as.matrix(mtcars[c(2:8)])
cars.corr <- cor(cars.matrix)
levelplot(cars.corr, colorkey=FALSE)