# NOT RUN {
col <- c(id = "cluster",
x = "x",
y = "y",
n = "n",
pos = "pos",
c.type = "residence",
wn = "weighted.n",
wpos = "weighted.pos"
)
dhs <- as.prevR(fdhs.clusters,col, fdhs.boundary)
is.prevR(dhs)
is.prevR(dhs,"rings")
is.prevR(dhs,"boundary")
dhs <- rings(dhs,N=300)
is.prevR(dhs,"rings")
# }
Run the code above in your browser using DataLab