循环基于鱼网大小提取栅格像元

时间:2020-01-27 12:40:30

标签: for-loop raster r-raster

我有一个栅格

***F1 <- raster("variance.tif")***

和基于每个渔网中细胞数量的不同渔网

***for(i in 3:7) { 
  nam <- paste("Fish", i, sep = "")                         
  assign(nam, create_fishnet(F1, pix_for_cell = c(i,i)))
}***

我可以以此单独提取细胞

t2 <- <- extract(F1, Fish2)
t3 <- extract(F1, Fish3)
t4 <- extract(F1, Fish4)
t5 <- extract(F1, Fish5)
t6 <- extract(F1, Fish6)

但是我只有6个渔网“大小”,因此我想将其循环。

到目前为止我有

***> for (i in 2:6) {
     ext[i] <- as.vector(extract(F1, a))
  }***

但是出现以下错误

回合(y)中的错误:数学函数的非数字参数

有没有一种方法可以针对相同的栅格但具有不同的渔网循环执行extract:raster函数?

谢谢

0 个答案:

没有答案