# NOT RUN {
{
require(raster)
# load example probability image
file <- system.file('extdata', 'probabilities.tif', package="rsMove")
img <- raster(file)
# load area of interest
file <- system.file('extdata', 'roi.shp', package="rsMove")
roi <- shapefile(file)
# extract samples
samples <- poly2sample(roi, img, min.cover=50)
}
# }
Run the code above in your browser using DataLab