首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >我怎样才能找到哪些基因被转换,哪些基因没有转化。

我怎样才能找到哪些基因被转换,哪些基因没有转化。
EN

Stack Overflow用户
提问于 2018-02-21 04:10:21
回答 1查看 396关注 0票数 0

我想转换一组基因,我可以用生物技术来转换它们。

代码语言:javascript
运行
复制
musGenes <- c("Hmmr", "Tlx3","STSRAAA1", "Cpeb4")
convertMouseGeneList <- function(x){
require("biomaRt")
human = useMart("ensembl", dataset = "hsapiens_gene_ensembl")
mouse = useMart("ensembl", dataset = "mmusculus_gene_ensembl")
genesV2 = getLDS(attributes = c("mgi_symbol"), filters = "mgi_symbol", values = x , mart = mouse, attributesL = c("hgnc_symbol"), martL = human, uniqueRows=T)
humanx <- unique(genesV2[, 2])
return(humanx)
}

它将只返回那些在数据库中,但不显示哪些不是。生物艺术中是否有不让数据重叠的功能?例如,在这种情况下,它应该为"STSRAAA1“返回空

例如,所需的输出应该如下所示

代码语言:javascript
运行
复制
Hmmr 
Tlx3
- 
Cpeb4
EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2018-02-21 04:36:06

我认为最简单的解决方案是将鼠标基因符号存储在数据帧(而不是向量)中,其列名与getLDS()返回的列名相同。然后可以使用例如merge()加入输出。

代码语言:javascript
运行
复制
library(biomaRt)
human <- useMart("ensembl", dataset = "hsapiens_gene_ensembl")
mouse <- useMart("ensembl", dataset = "mmusculus_gene_ensembl")

musGenes <- data.frame(MGI.symbol = c("Hmmr", "Tlx3","STSRAAA1", "Cpeb4"),
                       stringsAsFactors = FALSE)

genesV2 <- getLDS(attributes = c("mgi_symbol"), 
                  filters = "mgi_symbol", 
                  values = musGenes$MGI.symbol, 
                  mart = mouse, 
                  attributesL = c("hgnc_symbol"), 
                  martL = human)

merge(musGenes, genesV2, all = TRUE)

  MGI.symbol HGNC.symbol
1      Cpeb4       CPEB4
2       Hmmr        HMMR
3   STSRAAA1        <NA>
4       Tlx3        TLX3
票数 2
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/48898031

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档