Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
data(oldcol)
col.W <- nb2listw(COL.nb, style="W")
str(geary(COL.OLD$CRIME, col.W, length(COL.nb), length(COL.nb)-1,
Szero(col.W)))
# }
Run the code above in your browser using DataLab