2 つのラスター スタックがあります。各スタックのラスター レイヤーのペア間で計算を行い、同じ数のレイヤーの 3 番目のラスター スタックを生成します。
r1<- raster stack 1 # 10 raster layers
r2<- raster stack 2 # 10 raster layers
r3<- sqrt(r1^2 + r2^2) # 10 raster layers
これはループ形式と同等ですか (説明目的で);
for (i in 1:10) {
r <- sqrt(r1[[i]]^2 + r2[[i]]^2)
r3 <-stack(r3,r)
}
または、より効率的な関数または適用ソリューションはありますか? ありがとう。