powered by
dist.neig(neig)
if (require(mva, quiet = TRUE)) { data(elec88) d0 <- dist.neig(elec88$neig) plot(dist(elec88$xy),d0) }
Run the code above in your browser using DataLab