is_classification(x)
检查对象是否为 classification 类。
is_internode(x)
检查每个分类单元是否为节间。节间是指一个分类单元恰好有一个上级分类单元和
一个下级分类单元。这些分类群可以在不丢失它们之间的关系信息的情况下被移除。
R
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
is_internode(x)
[1] FALSE TRUE FALSE FALSE FALSE TRUE TRUE FALSE
is_leaf(x)
检查每个分类群是否为冠群。leaf 表示该类群没有下级分类群。
R
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
is_leaf(x)
[1] FALSE FALSE FALSE TRUE TRUE FALSE FALSE TRUE
is_root(x, subset = NULL)
检查每个分类群是否为起点类群。root 表示该类群没有上级分类群。
R
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris', 'Ursidae', 'Ursus', 'Ursus arctos'),
supertaxa = c(NA, 1, 2, 3, 3, 1, 6, 7))
is_root(x)
is_root(x, subset = 2:8)
[1] TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
[1] FALSE TRUE FALSE FALSE FALSE TRUE FALSE FALSE
is_stem(x)
检查每个分类单元是否是一个茎节点。stem 是指从根到具有多个亚分类单元的第一个分类单元的任何分类单元。
R
x <- taxonomy(c('Carnivora', 'Felidae', 'Panthera', 'Panthera leo',
'Panthera tigris'),
supertaxa = c(NA, 1, 2, 3, 3))
is_stem(x)
[1] TRUE TRUE FALSE FALSE FALSE
is_taxon(x)
检查对象是否为 taxon 类。
> x <- taxon(c('A', 'B', 'C'))
> is_taxon(x)
[1] TRUE
> is_taxon(1:2)
[1] FALSE
is_taxonomy(x)
检查对象是否为 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))
> is_taxonomy(x)
[1] TRUE
> is_taxonomy(1:2)
[1] FALSE
is_taxon_authority(x)
检查对象是否为 taxon_authority 类。
> x <- taxon_authority(c('Cham. & Schldl.', 'L.'),
+ date = c('1827', '1753'))
> is_taxon_authority(x)
[1] TRUE
> is_taxon_authority(1:3)
[1] FALSE
is_taxon_db(x)
检查对象是否为 taxon_db 类。
> x <- taxon_db(c('ncbi', 'ncbi', 'itis'))
> is_taxon_db(x)
[1] TRUE
> is_taxon_db(1:3)
[1] FALSE
is_taxon_id(x)
检查对象是否为 taxon_id 类。
> x <- taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi')
> is_taxon_id(x)
[1] TRUE
> is_taxon_id(1:3)
[1] FALSE
is_taxon_rank(x)
检查对象是否为 taxon_rank 类。
> x <- taxon_rank(c('species', 'species', 'phylum', 'family'))
> is_taxon_rank(x)
[1] TRUE
> is_taxon_rank(1:3)
[1] FALSE