r – levelplot：如何调整比例级别(at)和比例标签(标签)

2019年8月4日 353次阅读

我有带有分类值(-1,0,1)的栅格对象或者我想用levelplot绘制的具有偏斜分布的某些值.我希望负值的颜色与正值的颜色不同,白色的颜色为0左右.我希望刻度只显示几个不连续的步骤,因为我希望间距非等距,范围有时非常窄.我用

colorkey=list(at=c(), labels=c())

将参数传递给levelplot.这适用于比例,但实际值的颜色编码不等于比例显示的值.如果我使用这个论点

at=c()

仅仅,格子中的比例值和值是对应的.如果我也单独添加labels = c(),它们将不会在刻度上显示,而只会在轮廓线上显示.
所以我的问题：

如何标记我的比例,设置’at’,并且格子中的值同时对应于我的比例值？以下是一些示例数据：

library(raster)
library(colorspace)
library(rasterVis)
X <- raster(nrow=10,ncol=10)
set.seed(1)
X[] <- rchisq(df=10,n=10*10)*c(1,-1)
X[X[]>0] <- X[X[]>0]+seq(1,100,length.out=length(X[X[]>0]))
Uniques <- cellStats(X,stat=unique)
Uniques.max <- max(Uniques)
Uniques.min <- min(Uniques)
Acol.regions <- colorspace::diverge_hsv(n=9)

如果我使用colorkey：

levelplot(X, col.regions = Acol.regions,colorkey=list(
  at=round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2),
  labels=as.character(round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2)*2)),
          margin=F)

我最终得到了显示比例的正确方法,但格子中的值被错误地着色：

如果我单独传递at = c(),labels = c()：

levelplot(X, col.regions = Acol.regions,
  at=round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2),
  labels=as.character(round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2)*2),
          margin=F)

我最终得到了比例和点阵中的相应值,但没有显示标签：

亲切的问候,
埃里克

最佳答案 解决了它：我说了两次at = c()参数.一旦直接在levelplot中,然后在colorkey-list中

levelplot(X, col.regions = Acol.regions,at=round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2),
          colorkey=list(
  at=round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2),
  labels=as.character(round(c(seq(Uniques.min,0,length.out=5)[-5],0,seq(0,Uniques.max,length.out=5)[-1]),2)*2)),
          margin=F)

感谢任何可能尝试过的人.埃里克

点赞