# semantics_functions.R
library(ontologyIndex)
# list ontologies and their files
{
# compute
ontonames <- dir("../resources/", pattern = "\\.obo$")
ontopath <- dir("../resources/", pattern = "\\.obo$")
# gather
ontoDF <- data.frame(
name = c(
gsub("\\..*$","",ontonames)
),
path = c(
"~/Softwares/Gits/OB1.metadata/resources/marinetlo.obo"
),
stringsAsFactors = FALSE
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.