comat <- matrix(sample(1000, 50), 5, 10)
rownames(comat) <- paste0("Site", 1:5)
colnames(comat) <- paste0("Species", 1:10)
net <- similarity(comat, metric = "Simpson")
clust <- netclu_louvain(net)
bioregion_metrics(bioregionalization = clust,
comat = comat)
Run the code above in your browser using DataLab