cor
работает только для фреймов данных или матриц. Вам нужно извлечь слот data из SpatialPolygonsDataFrame
:
grd <- GridTopology(c(1,1), c(1,1), c(10,10))
polys <- as(grd, "SpatialPolygons")
centroids <- coordinates(polys)
x <- centroids[,1]
y <- centroids[,2]
z <- 1.4 + 0.1*x + 0.2*y + 0.002*x*x
ex_1.7 <- SpatialPolygonsDataFrame(polys,
data=data.frame(x=x, y=y, z=z, row.names=row.names(polys)))
class(slot(ex_1.7, "data"))
cor(slot(ex_1.7, "data"))
Пример SpatialPolygonsDataFrame
из документов по адресу:
??sp::`SpatialPolygonsDataFrame-class`