# NOT RUN {
{
require(raster)
# reference data
data(longMove)
# extract regions
hm <- hotMove(longMove, 0.1, return.shp=TRUE)
# plot shapefile (color by region)
plot(hm$polygons, col=hm$indices)
}
# }
Run the code above in your browser using DataLab