# NOT RUN {
# Get a set of samples
samples_ndvi_evi <- sits_select(samples_mt_4bands, bands = c("NDVI", "EVI"))
# train a deep learning model
dl_model <- sits_train(samples_ndvi_evi, ml_method = sits_deeplearning(
    layers = c(512, 512, 512),
    activation = "relu",
    dropout_rates = c(0.50, 0.40, 0.35),
    epochs = 100,
    batch_size = 128,
    validation_split = 0.2
))
plot(dl_model)
# }
Run the code above in your browser using DataLab