Nothing
## -----------------------------------------------------------------------------
library(ontologyIndex)
library(ontologySimilarity)
data(hpo)
set.seed(1)
## -----------------------------------------------------------------------------
information_content <- descendants_IC(hpo)
## -----------------------------------------------------------------------------
term_sets <- replicate(simplify=FALSE, n=5, expr=minimal_set(hpo, sample(hpo$id, size=8)))
term_sets
## -----------------------------------------------------------------------------
sim_mat <- get_sim_grid(ontology=hpo, term_sets=term_sets)
sim_mat
## -----------------------------------------------------------------------------
get_sim(sim_mat, group=1:3)
## -----------------------------------------------------------------------------
get_sim_p(sim_mat, group=1:3)
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.