pop <- data.frame(a = c(1, 3), b = c(1, 1))
row.names(pop) <- paste0("sp", 1:2)
pop <- pop / sum(pop)
meta <- metacommunity(pop)
# Calculate normalised metacommunity alpha diversity
norm_meta_alpha(meta, 0:2)
Run the code above in your browser using DataLab