R/moranPoints.R

In JusteRaimbault/r-spatialmorphology: What the package does (short line)

Defines functions moranPoints

Documented in moranPoints

moranPoints <-
function(points,varcol,weights=spatialWeightsPoints(points)){
  v = points[[varcol]]
  v = v-mean(v)
  num = sum(weights*(Diagonal(v)%*%Diagonal(v)))
  denom = sum(v^2)
  normalization = nrow(points) / sum(weights)
  return(normalization*num/denom)
}