r-光栅的相关性和p值

Question

我有4个光栅，我用这个代码计算了相关矩阵；但我需要知道p值，但我没能做到。你能帮我吗？

a<-stack(FS2,FP2,W2,P)
jnk=layerStats(a, 'pearson', na.rm=T)
corr_matrix=jnk$'pearson correlation coefficient'

Answer 1

您可以在光栅包中使用corLocal函数：

library(raster)
b <- stack(system.file("external/rlogo.grd", package="raster"))
b <- aggregate(b, 2, mean)
#flip one layer so values differ:
set.seed(0)
b[[2]] <- flip(b[[2]], 'y') + runif(ncell(b))
b[[1]] <- b[[1]] + runif(ncell(b))
plot(b)
#run correlation
x <- corLocal(b[[1]], b[[2]], test=TRUE )
#view pearson correlation and p-value
plot(x)