基于IBS矩阵 在R语言中构建NJ进化树 写出nwk文件
构建系统发育树有很多方法,但是mega太慢,DNAman太丑。
当时,小Y还有30分钟进行工作汇报,眼瞅着来不及,在友人小湖的指点下,第一次在R语言上进行了进化树的绘制。随后下载nwk文件,在itol网站上进行美化。
一个小白的分享哈
流程:
1、使用plink进行IBS矩阵的构建;
2、基于IBS矩阵,在R语言构建nj进化树,并写出nwk文件;
3、将nwk文件在itol网站上进行美化。
1、使用plink进行IBS矩阵的构建;
plink --bfile 45_zk -recode -out 45_zk ## 转换二进制文件45_zk 为文本格式
plink --file 45_zk --cluster --matrix --noweb ##构建IBS矩阵
会出现如上图所示的文件。接下来,我们会使用plink.mibs 和 plink.mibs.id
2、基于IBS矩阵,在R语言构建nj进化树,并写出nwk文件;
#包的安装与读取 install.packages("age")
install.packages("phangorn")
install.packages("seqinr")library(ape)
library(phangorn)
library(seqinr)##读入plink.mibs文件
dir()
m<-as.matrix(read.table("plink.mibs"))
这是小Y的一个数据,可以看到读入IBS矩阵后,共有个体366个
m<-as.matrix(read.table("plink.mibs"))
dimnames(m) <- list(1:366, 1:366) #366为个体数#构建单位矩阵g
g=matrix(1,nrow=366,ncol=366,byrow=FALSE)#记得更新个体数#计算遗传距离 D=1-IBS,
D=g-m
此时有的一些数据情况如下图
ID_number <- read.table("plink.mibs.id")
rownames(D) <- ID_number$V1 #补充每分支的IDtr2 <- bionj(D) #使用bionj函数进行建树write.tree(tr,file="tr.nwk") #写出nwk文件,可在itol中美化树
如果直接在R 中出图,可以用以下命令
plot(tr2,cex =0.5) #输出系统发育树
plot(tr2,type="unrooted") #输出系统发育树
但是小Y半瓶子咣当当,不会调参数,就直接在itol 中进行了美化
3、将nwk文件在itol网站上进行美化。
https://itol.embl.de/
这个网站,简单方便又免费,又好看。就不班门弄斧了,推荐一个小Y当时学习的教程吧
https://www.jianshu.com/p/d93c2a6d9d10
补充一个无根树图
基于IBS矩阵 在R语言中构建NJ进化树 写出nwk文件相关推荐
- r语言导出文件为xlxs_R语言数据导出到Excel表格-如何将R语言中的表格数据输出为Excel文件...
r语言怎么将values中的数据导出为excel 直接新建一个txt文件,打开,然后按ctrl A,复制excel表格中数据,直接粘贴至该打开的txt文件里即可.或者打开excel后,另存为" ...
- r语言 python 股票_python r语言 股票!如何用python写出爬虫?
python计时器问题? import time print('按下回车开始,按下 Ctrl C 暂停/停止计时.') while True: input("") starttim ...
- r导入excel数据 linux,R语言中使用rio读取xlsx格式Excel文件|多个sheet表格|tidyverse rbind XLConnect readxl...
前言 有时候数据格式是xlsx的,内部含有多个sheet表格,如果直接转换成csv的话非常费时.如果想批量处理文件(或者装个逼),这样就需要用到R了. 多种方案 使用rio包一次性读取到data li ...
- moran指数 r语言_白话空间统计之二十五:空间权重矩阵(四)R语言中的空间权重矩阵(2):不同空间关系对莫兰指数的影响...
原标题:白话空间统计之二十五:空间权重矩阵(四)R语言中的空间权重矩阵(2):不同空间关系对莫兰指数的影响 上一篇,讲了R语言中的空间权重矩阵的结构,这一节讲讲R语言里面空间权重矩阵的自定义. 与Ar ...
- 《R语言编程艺术》——1.4 R语言中一些重要的数据结构
1.4 R语言中一些重要的数据结构 R有多种数据结构.本节将简单介绍几种常用的数据结构,使读者在深入细节之前先对R语言有个大概的认识.这样,读者至少可以开始尝试一些很有意义的例子,即使这些例子背后更多 ...
- R+openNLP︱openNLP的六大可实现功能及其在R语言中的应用
每每以为攀得众山小,可.每每又切实来到起点,大牛们,缓缓脚步来俺笔记葩分享一下吧,please~ --------------------------- openNLP是NLP中比较好的开源工具,R语 ...
- r语言 将表格导出为csv_如何将R语言中表格数据输出为Excel文件.pdf
如何将R 语言中的表格数据输出为Excel 文件 熊荣川 六盘水师范学院生物信息学实验室 xiongrongchuan@126.com /u/Bearjazz 平台的开放性使得R 语言具有了丰富的运算 ...
- 如何在R语言中建立六边形矩阵热图heatmap可视化
原文链接:http://tecdat.cn/?p=18879 这是一个六边形热图可视化程序,主要用到的知识RColorBrewer,fields,也就是R中的可视化绘图库(点击文末"阅读原文 ...
- 白话空间统计之二十五:空间权重矩阵(四)R语言中的空间权重矩阵(2)
上一篇,讲了R语言中的空间权重矩阵的结构,这一节讲讲R语言里面空间权重矩阵的自定义. 与ArcGIS自定义空间权重矩阵一样,R语言的空间权重矩阵如果纯粹从零开始自定义生成,是非常麻烦的事情,所以我们一 ...
最新文章
- c++ 从混合中英文数字等的string 中按顺序分别输出
- Laravel 将数据表中的数据导出,并生成seed文件
- fetch 不是xhr_春招|前端2019应届春招:不是被大厂选,而是选大厂(字节跳动,美团,网易)...
- prototype 对象的进一步深入理解
- Hashtable 数据遍历的几种方式
- apache 服务器修改网站默认首页
- loadrunner监控linux内存,Loadrunner11监控LINUX服务器
- (项目笔记)opencv人脸识别
- ps怎么把模糊的图片变清楚
- Android OTA升级
- 写给父亲的语音计算器(‘(‘‘)‘算法参与运算c#,二)
- 目标检测和分类的评价指标
- glTF格式模型导出方式
- linux查看是centos几版本
- live555 android,live555
- 常用英文单词的标准缩写
- Jquery调用打印机打印(包含去除页眉页脚)
- Ubuntu Linux 的 十六進位(hex)編輯器
- 降雨量毫米怎么换算成毫升?
- 慧算账助力加盟商实现互联网+财税改革
热门文章
- nnU-Net: Self-Adapting Framework for U-Net-Based Medical Image Segmentation
- matlab 电场线公式,基于Matlab的静电场电场线和等势线(面)的数值模拟
- 33 个 2017 年必须了解的 iOS 开源库
- APISpace 星座配对API
- html在线表格样式模板,HTML5+CSS3 表格设计(Table)
- DropDownList
- MongoDB-数据库安装及常见操作-001
- 前端之CSS——属性和定位
- python调用linuxapi_Linux上使用python调用WPS二次开发接口
- 织梦CMS5.7版自动给图片添加alt属性的方法