R语言【taxa】——从taxa 定义的类中获取组分信息

Package taxa version 0.4.2


tax_auth(x)

在拥有对应信息的对象中设置和获取类群所有权信息。

复制代码
> x <- taxon(name = c('Homo sapiens', 'Bacillus', 'Ascomycota', 'Ericaceae'),
+            rank = c('species', 'genus', 'phylum', 'family'),
+            id = taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi'),
+            auth = c('Linnaeus, 1758', 'Cohn 1872', NA, 'Juss., 1789'))

> tax_auth(x)
<taxon_authority[4]>
[1] Linnaeus 1758 Cohn 1872     NA            Juss. 1789   

> tax_auth(x) <- tolower(tax_auth(x))
> tax_auth(x)[1] <- 'Billy'
> x
<taxon[4]>
[1] 9606|Homo sapiens Billy |species 1386|Bacillus cohn 1872|genus   
[3] 4890|Ascomycota na  |phylum      4345|Ericaceae juss. 1789|family
Rank levels: phylum < family < genus < species

tax_author(x)

设置和获取分类群的作者信息。

复制代码
> x <- taxon_authority(c('Cham. & Schldl.', 'L.'),
+                      date = c('1827', '1753'))

> tax_author(x)
[1] "Cham. & Schldl." "L."     
        
> tax_author(x)[1] <- "Billy"
> tax_author(x) <- tolower(tax_author(x))
> tax_author(x)
[1] "billy" "l." 

tax_cite(x)

设置和获取分类群的引用信息。

复制代码
> x <- taxon_authority(c('Cham. & Schldl.', 'L.'),
+                      date = c('1827', '1753'),
+                      citation = c(NA, 'Species Plantarum'))

> tax_cite(x)
[1] NA                  "Species Plantarum"

> tax_cite(x)[1] <- "Cham. et al 1984"
> tax_cite(x)
[1] "Cham. et al 1984"  "Species Plantarum"

tax_date(x)

设置和获取分类群的日期信息。

复制代码
> x <- taxon_authority(c('Cham. & Schldl.', 'L.'),
+                      date = c('1827', '1753'))

> tax_date(x)
[1] "1827" "1753"

> tax_date(x)[1] <- "1984"
> tax_date(x) <- c(NA, '1800')
> tax_date(x)
[1] NA     "1800"

tax_db(x)

设置和获取分类群的数据库信息。

复制代码
> x <- taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi')

> tax_db(x)
<taxon_db[4]>
[1] ncbi ncbi ncbi ncbi

> tax_db(x) <- 'nbn'
> tax_db(x)[2] <- 'itis'
> tax_db(x)
<taxon_db[4]>
[1]  nbn itis  nbn  nbn

tax_id(x)

设置和获取类群的ID。

复制代码
> x <- taxon(name = c('Homo sapiens', 'Bacillus', 'Ascomycota', 'Ericaceae'),
+            rank = c('species', 'genus', 'phylum', 'family'),
+            id = taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi'),
+            auth = c('Linnaeus, 1758', 'Cohn 1872', NA, 'Juss., 1789'))

> tax_id(x)
<taxon_id[4]>
[1] 9606 (ncbi) 1386 (ncbi) 4890 (ncbi) 4345 (ncbi)

> tax_id(x) <- paste0('00', tax_id(x))
> tax_id(x)[1] <- '00000'
> tax_id(x)
<taxon_id[4]>
[1] 00000  001386 004890 004345

tax_name(x)

设置和获取分类群名称。

复制代码
> x <- taxon(name = c('Homo sapiens', 'Bacillus', 'Ascomycota', 'Ericaceae'),
+            rank = c('species', 'genus', 'phylum', 'family'),
+            id = taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi'),
+            auth = c('Linnaeus, 1758', 'Cohn 1872', NA, 'Juss., 1789'))

> tax_name(x)
[1] "Homo sapiens" "Bacillus"     "Ascomycota"   "Ericaceae"   

> tax_name(x) <- tolower(tax_name(x))
> tax_name(x)[1] <- 'Billy'
> tax_name(x)
[1] "Billy"      "bacillus"   "ascomycota" "ericaceae"

tax_rank(x)

设置和获取类群等级。

复制代码
> x <- taxon(name = c('Homo sapiens', 'Bacillus', 'Ascomycota', 'Ericaceae'),
+            rank = c('species', 'genus', 'phylum', 'family'),
+            id = taxon_id(c('9606', '1386', '4890', '4345'), db = 'ncbi'),
+            auth = c('Linnaeus, 1758', 'Cohn 1872', NA, 'Juss., 1789'))

> tax_rank(x)
<taxon_rank[4]>
[1] species genus   phylum  family 
Rank levels: phylum < family < genus < species

> tax_rank(x) <- 'species'
> tax_rank(x)[1] <- taxon_rank('family')
> tax_rank(x)
<taxon_rank[4]>
[1] family  species species species
Rank levels: family < species
相关推荐
1024小神4 分钟前
tauri项目在windows上的c盘没有权限写入文件
c语言·开发语言·windows
老虎062712 分钟前
数据结构(Java)--位运算
java·开发语言·数据结构
yanjiaweiya13 分钟前
云原生-集群管理续
java·开发语言·云原生
Swift社区14 分钟前
Swift 解 LeetCode 320:一行单词有多少种缩写可能?用回溯找全解
开发语言·leetcode·swift
写不出来就跑路19 分钟前
暑期实习感悟与经验分享:从校园到职场的成长之路
java·开发语言·经验分享·spring boot
灵智工坊LingzhiAI2 小时前
人体坐姿检测系统项目教程(YOLO11+PyTorch+可视化)
人工智能·pytorch·python
weixin_472339466 小时前
高效处理大体积Excel文件的Java技术方案解析
java·开发语言·excel
枯萎穿心攻击6 小时前
响应式编程入门教程第二节:构建 ObservableProperty<T> — 封装 ReactiveProperty 的高级用法
开发语言·unity·c#·游戏引擎
Eiceblue8 小时前
【免费.NET方案】CSV到PDF与DataTable的快速转换
开发语言·pdf·c#·.net
m0_555762908 小时前
Matlab 频谱分析 (Spectral Analysis)
开发语言·matlab