#' @importFrom rioja Hill.N2
#' @importFrom stats quantile
#' @export
Hill.N2.core <- function(spp) {
hn2 <- Hill.N2(spp, margin = 1)
return(quantile(hn2, prob = c(0, .25, .5)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.