# NOT RUN {
# Retrieve the set of samples for the Mato Grosso region (provided by EMBRAPA)
data(samples_mt_ndvi)
# Build a random forest model
rfor_model <- sits_train(samples_mt_ndvi, sits_rfor())
# get a point with a 16 year time series
data(point_ndvi)
# classify the point
class.tb <- sits_classify (point_ndvi, rfor_model)
# plot the classification
sits_plot(class.tb)
# }
Run the code above in your browser using DataLab