Nothing
average_ranks.cover <- function(x, level = 0.9, error = 10^(-5), ...) {
x <- cover2incidence(x)
average_ranks.incidence(x, level=level, error=error)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.