十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
这篇文章主要介绍“r语言怎么实现manhattan图”,在日常操作中,相信很多人在r语言怎么实现manhattan图问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”r语言怎么实现manhattan图”的疑惑有所帮助!接下来,请跟着小编一起来学习吧!
专注于为中小企业提供成都网站建设、做网站服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业龙山免费做网站提供优质的服务。我们立足成都,凝聚了一批互联网行业人才,有力地推动了近1000家企业的稳健成长,帮助中小企业通过网站建设实现规模扩充和转变。
一、R-qqman包
R包就会涉及安装,载入,如下:
安装:install.packages('qqman')
载入:library(qqman)
head(gwasResults,3) #查看qqman提供qwas示例数据(gwasResult)
SNP CHR BP P
1 rs1 1 1 0.9148060
2 rs2 1 2 0.9370754
3 rs3 1 3 0.2861395
其中:SNP---snp名称,CHR---染色体编号,BP---碱基位置,P---p值;
1)最简单的manhattan:
manhattan(gwasResults)
2)加入标题、调整颜色、部分SNP高亮等细节
head(snpOfInterest) #查看内置高亮snp数据, snpOfInterest可自行设置
manhattan(gwasResults, col = c("blue4", "orange3"), main = "Results from simulated trait",genomewideline = FALSE, suggestiveline = FALSE,highlight = snpsOfInterest[1:10])
其中参数:
CHR3的绿色点来自snpsOfInterest,highlight参数控制;
蓝色横线由参数suggestiveline控制;
红色横线由参数genomewideline控制;
3)批量表示基因名
gwasResults[3057,1] <- "AA" #将最显著的点,自定义,可看出改变
manhattan(gwasResults,suggestiveline =FALSE,genomewideline =FALSE,col=c("#FF6A6A","#43CD80","#EE7600"),annotatePval=0.05,annotateTop=TRUE)
其中: annotatePval可以设置p阈值,低于该值的散点将会在图中被标记;annotateTop默认为True,即仅标记p值最小的点,所以该图中各条染色体只有一个snp被标记,倘若annotateTop设置为False,则所有低于annotatePval的点均会被标记。
二、R-CMplot包
参数更多,图更美观;多表型manhattan图绘制;circos状展示;
1)沿用gwasResults数据:CMplot(gwasResults,plot.type="m",LOG10=TRUE,threshold=NULL,chr.den.col=NULL,file="jpg",memo="",dpi=300)
2)SNP的密度在图下面展示(CMplot内置数据):
CMplot(pig60K, plot.type="m", LOG10=TRUE, ylim=NULL, threshold=c(1e-6,1e-4),threshold.lty=c(1,2), threshold.lwd=c(1,1), threshold.col=c("black","grey"),
amplify=TRUE,chr.den.col=c("darkgreen","yellow","red"),bin.size=1e6,signal.col=c("red","green"),signal.cex=c(1,1),signal.pch=c(19,19),file="jpg",memo="",dpi=300)
#parameter 'chr.den.col' is bigger than 1, SNP density that counts the number of SNP within given size('bin.size') will be plotted
3)多表型展示
CMplot(pig60K, plot.type="m", multracks=TRUE, threshold=c(1e-6,1e
4),threshold.lty=c(1,2),threshold.lwd=c(1,1), threshold.col=c("black","grey"), amplify=TRUE,bin.size=1e6,chr.den.col=c("darkgreen", "yellow", "red"), signal.col=c("red","green"),signal.cex=c(1,1),file="jpg",memo="",dpi=300)
4)circos状展示
CMplot(pig60K,plot.type="c",chr.labels=paste("Chr",c(1:18,"X"),sep=""),r=0.4,cir.legend=TRUE,outward=FALSE,cir.legend.col="black",cir.chr.h=1.3,chr.den.col="black",file="jpg",memo="",dpi=300)
到此,关于“r语言怎么实现manhattan图”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注创新互联网站,小编会继续努力为大家带来更多实用的文章!