if (sits_run_examples()) {
clusters <- sits_cluster_dendro(cerrado_2classes)
freq1 <- sits_cluster_frequency(clusters)
freq1
clean_clusters <- sits_cluster_clean(clusters)
freq2 <- sits_cluster_frequency(clean_clusters)
freq2
}
Run the code above in your browser using DataLab