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