Вікіпедія помилкова ... чи я її не розумію?
Вікіпедія: Білі та чорні квадрати («шаховий малюнок») ідеально розійшлися, так що в Морана я був би -1. Якби білі квадрати були складені до однієї половини дошки, а чорні - до іншої, то для Морану я був би близький до +1. Випадкове розташування квадратних кольорів дасть значення Морану I близьке до 0.
# Example data:
x_coor<-rep(c(1:8), each=8)
y_coor<-rep(c(1:8), length=64)
my.values<-rep(c(1,0,1,0,1,0,1,0,0,1,0,1,0,1,0,1), length=64)
rbPal <- colorRampPalette(c("darkorchid","darkorange"))
my.Col <- rbPal(10)[as.numeric(cut(my.values,breaks = 10))]
# plot the point pattern...
plot(y_coor,x_coor,col = my.Col, pch=20, cex=8, xlim=c(0,9),ylim=c(0,9))
Тож, як ви бачите, точки прекрасно розійшлися
# Distance matrix
my.dists <- as.matrix(dist(cbind(x_coor,y_coor)))
# ...inversed distance matrix
my.dists.inv <- 1/my.dists
# diagonals are "0"
diag(my.dists.inv) <- 0
Обчислювальна бібліотека Морана I (мавпа)
Moran.I(my.values, my.dists.inv)
$observed
[1] -0.07775248
$expected
[1] -0.01587302
$sd
[1] 0.01499786
$p.value
[1] 3.693094e-05
Чому я спостерігаю = -0.07775248 замість "-1".
ape