負の値と正の値にまたがるデータを視覚化/マッピングする方法についての洞察が必要です。一緒に積み重ねられた 6 つのラスターがあり ( s
)、その後 R の関数を介してプロットさlevelplot
れます。以下は、それぞれのmax
とのmin
値ですraster
。
39.2887, 53.09207 (min, max) # r1
-32.4956, -27.25534 (min, max)# r2
-14.37683, -11.37742 (min, max)# r3
9.512934, 13.60197 (min, max)# r4
-4.993901, -1.851784 (min, max)# r5
-8.190711, -5.104764 (min, max)# r6
現時点では、次の方法でマップを作成できます。
library(raster)
library(rasterVis)
library(colorRamp)
s <- stack(r1,r2,r3,r4,r5,r6)
themes2 <- colorRampPalette(c("darkred", "red3", "orange", "yellow", "lightskyblue", "royalblue3", "darkblue"))(19)
myat =unique(seq(floor(min(s)) ,ceiling(max(s)),length.out=20))
myat=round(myat,digits = 0)#
#themes <- rasterTheme(region=rev(brewer.pal(11,'RdYlBu')))
myColorkey <- list(at=myat,space = "right",labels=list(cex=1,at=myat))
if (dev.cur() == 1) x11(width=18,height=18)
levelplot(s, layout=c(3, 2), index.cond=list(c(1, 3, 5, 2, 4, 6)),col.regions=themes2,
margin=FALSE,xlab=NULL,at =unique(seq(floor(min(s)) ,ceiling(max(s)),length.out=20)),
par.strip.text=list(cex=0),colorkey=myColorkey,scales=list(alternating=F))
注: すべてのラスターに共通の単一のカラーキーが必要です。
問題: 範囲が狭いラスターの場合、セル間の変動がうまく伝わらず、マップ上の情報がうまく視覚化されません。levelplot
この広い範囲全体を使用して、そのようなデータをどのように視覚化できますか?
上記の範囲内の値を持つ 6 つのラスターを生成して、さらに手がかりを得ることができます。
ご協力いただきありがとうございます!カラーキーは赤から青である必要はありません。「The Default Rainbow Palette」のようなものがいいでしょう。
"
これらすべてのラスターに対して、単一の共有カラーキーが必要です。現時点では、セル範囲が小さいラスターは、ごくわずかな変動しか示していません。