# NOT RUN {
# Retrieve the set of samples for the Mato Grosso region
samples_MT_ndvi <- sits_select(samples_modis_4bands, bands = "NDVI")
# Build a random forest model
rfor_model <- sits_train(samples_MT_ndvi, sits_rfor(num_trees = 300))
# get a point with a 16 year time series
point_ndvi <- sits_select(point_mt_6bands, bands = "NDVI")
# classify the point
class.tb <- sits_classify(point_ndvi, rfor_model)
# }
Run the code above in your browser using DataLab