data(siskiyou)
x <- prabinit(prabmatrix=siskiyou, neighborhood=siskiyou.nb,
distance="none")
# Not run; this needs package spdep
# prab.sarestimate(x)
prab.sarestimate(x, sar=FALSE)Run the code above in your browser using DataLab