roots(x, subset = NULL)
? ? ? ? 在 taxonomy 中查找根节点类群的索引值。
> x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
+ 'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
+ supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
> roots(x)
[1] 1
> roots(x, subset = 2:8)
[1] 2 6
stems(x, value = NULL, ...)
? ? ? ? 返回每个类群的茎节点的索引值。
> x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
+ 'Panthera tigris'),
+ supertaxa = c(NA, 1, 2, 3, 3))
> x <- c(x, x)
> stems(x)
[[1]]
[1] 1 2
[[2]]
[1] 6 7
> stems(x, value = tax_name(x))
[[1]]
[1] "Carnivora" "Felidae"
[[2]]
[1] "Carnivora" "Felidae"
> x
<taxonomy[10]>
1: Carnivora
└─2: Felidae
└─3: Panthera
├─4: Panthera leo
└─5: Panthera tigris
6: Carnivora
└─7: Felidae
└─8: Panthera
├─9: Panthera leo
└─10: Panthera tigris
subtaxa(x, subset = NULL, max_depth = NULL, include = FALSE, value = NULL, ...)
? ? ? ? 返回所有子类群的索引值。
# Generate example data
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
# The indexes of all subtaxa (with subtaxa of subtaxa, etc) for each taxon
subtaxa(x)
# The indexes of immediate subtaxa (without subtaxa of subtaxa, etc) for each taxon
subtaxa(x, max_depth = 1)
# Return something other than index
subtaxa(x, value = tax_name(x))
# Include each taxon with its subtaxa
subtaxa(x, value = tax_name(x), include = TRUE)
# Only return data for some taxa (faster than subsetting the whole result)
subtaxa(x, subset = 3)
supertaxa( x, subset = NULL, max_depth = NULL, include = FALSE, value = NULL, use_na = FALSE, ... )
? ? ? ? 返回所有父类群的索引值。
# Generate example data
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
# The indexes of all supertaxa (with supertaxa of supertaxa, etc) for each taxon
supertaxa(x)
# Return something other than index
supertaxa(x, value = tax_name(x))
# Include each taxon with its supertaxa
supertaxa(x, value = tax_name(x), include = TRUE)
# Only return data for some taxa (faster than subsetting the whole result)
supertaxa(x, subset = 3)