Я пытаюсь суммировать значения растрового изображения со значениями 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 всех значений ячеек.Заранее спасибо.