# NOT RUN {
# Get a set of samples
samples_ndvi_evi <- sits_select(samples_modis_4bands,
bands = c("NDVI", "EVI"))
# train a deep learning model
dl_model <- sits_train(samples_ndvi_evi, ml_method = sits_mlp())
plot(dl_model)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab