# NOT RUN {
{
require(raster)
# read raster data
r <- brick(system.file("extdata", "ndvi.tif", package="fieldRS"))
# spatial change labeling
or <- ccLabel(r[[1]], method="spatial", change.threshold=10)
plot(or$regions)
# temporal change labeling
or <- ccLabel(r, method="temporal", change.threshold=80)
plot(or$regions)
}
# }
Run the code above in your browser using DataLab