obtain list of names of a set of ancestors
Examples
pa = get_ordo_owl_path()
o2 = try(reticulate::import("owlready2"), silent=TRUE)
if (!inherits(o2, "try-error")) {
orde = setup_entities(pa)
al = ancestors(orde[1001:1002])
ancestors_names(al)
}
#> $Orphanet_146
#> [1] "Orphanet_557493" "Orphanet_377788" "Orphanet_146" "Thing"
#> [5] "Orphanet_C001"
#>
#> $Orphanet_251576
#> [1] "Orphanet_251576" "Orphanet_557494" "Thing" "Orphanet_C001"
#>