classification <- DoU_classify_grid(DoU_load_grid_data_belgium())
# plot with standard color scheme
DoU_plot_grid(classification)
# use custom palette and labels
DoU_plot_grid(classification,
palette = c("3" = "#e16c72", "2" = "#fac66c", "1" = "#97c197", "0" = "#acd3df"),
labels = c("UC", "UCL", "RUR", "WAT")
)
Run the code above in your browser using DataLab