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