powered by
write.nb.gal(nb, file)
nb
read.gal
data(columbus) GALfile <- tempfile("GAL") write.nb.gal(col.gal.nb, GALfile) col.queen <- read.gal(GALfile) unlink(GALfile) summary(diffnb(col.queen, col.gal.nb))
Run the code above in your browser using DataLab