我试图总结 NDVI 值的卫星图像栅格的值。我已经提取了数据,它似乎已经填充了一个我可以在控制台窗口中看到的列表,但是我无法使用“查看”功能看到它,也无法将其转换为 .csv。
示例数据
library(raster)
r <- raster(ncol=36, nrow=18, vals=1:(18*36))
ndvi <- stack(r, r*2, r*3)
cds1 <- rbind(c(-180,-20), c(-160,5), c(-60, 0), c(-160,-60), c(-180,-20))
cds2 <- rbind(c(80,0), c(100,60), c(120,0), c(120,-55), c(80,0))
polys <- spPolygons(cds1, cds2)
提取值
v <- extract(ndvi, polys)
写入文件
write.csv(v, "test.csv")
#Error in (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE, : arguments imply differing number of rows: 38, 23
str(v)
#List of 2
# $ : num [1:38, 1:3] 326 327 328 329 330 331 332 333 334 335 ...
# ..- attr(*, "dimnames")=List of 2
# .. ..$ : NULL
# .. ..$ : chr [1:3] "layer.1" "layer.2" "layer.3"
# $ : num [1:23, 1:3] 173 208 209 244 245 280 281 282 315 316 ...
# ..- attr(*, "dimnames")=List of 2
# .. ..$ : NULL
# .. ..$ : chr [1:3] "layer.1" "layer.2" "layer.3"
我希望能够在某个时候使用 NDVI 图像的单元格值的分布将其与另一组数据相关联,所以为了做到这一点,我需要有一个所有值的工作 csv细胞。先感谢您。