search
技术服务021-34781616

欧易生物

热门搜索关键词:转录组基因组甲基化酵母文库蛋白芯片

021-34781616

当前位置凯发k8凯发k8网址官网下载首页 » 新闻资讯 » 技术&解读&应用 » 大神教你零基础绘制3d动态network图

大神教你零基础绘制3d动态network图

来源: 查看手机网址
扫一扫!扫一扫!
浏览:- 发布日期:2017-08-28 14:02:39【 】

还在为cytoscape网络图的绘制心塞吗?还在因为关系对太多调图烦恼么?是否觉得2d网络互作图不够炫酷?读书少了吧,读书少了该好好听讲!下面请听大圣为大家开讲。

您只需要一台电脑,可windows也可linux,然后只要您安装了r软件即可。(不会安装r?没关系,欧易每月一次的小语言培训班火热报名中,名额有限,各位老师们快快联系。

(http://www.oebiotech.com/projects/bioinfo_analysis_training.html)

好了回归正题,给大家介绍一款通过christopher gandrud编写的d3network包,它可以轻松创建基于htmlwidgets框架的网络图,目前支持三种类型的网络图:

1.力导向图,可以显示复杂的网络划分关系;

2.桑基图(sankeydiagram),利于展现分类维度间的相关性,以流的形式呈现共享同一类别的元素数量。特别适合表达集群的发展,比如展示特定群体的人数分布等;

3.reingold-tilford树型图,可以把一个树形结构的数据,用不重叠、紧凑、分层的形式展示出来。

是不是很炫酷,好了,长话短说,直接进入主题,首先我们得在r上安装一个networkd3包,在r环境下输入source("http://bioconductor.org/bioclite.r"),然后bioclite("networkd3"),安装完networkd3包,还得安装一个pandoc软件,从https://github.com/jgm/pandoc/releases/tag/1.19.2.1网址中下载pandoc-1.19.2.1-1-amd64.deb,然后安装sudo dpkg -i pandoc-1.19.2.1-1-amd64.deb,至此前期的安装完成。

下面仅以力导向图为例来说说3d动态网页版网络图的绘制,首先载入networkd3包,然后创建src源、target目标两个向量,整合成数据框networkdata,最后就可以通过simplenetwork函数画出一个简单的力导向图(见例1);此外,也可以通过自有数据框mislinks、misnodes创建复杂一点的力导向图(见例2)。

#例1

# 载入软件包

library(networkd3)

# 创建数据

src <- c("a", "a","a", "a","b", "b", "c","c", "d")

target <- c("b", "c","d", "j","e", "f", "g","h", "i")

networkdata <- data.frame(src, target, zoom =true)

# 画图

html <-simplenetwork(networkdata)

savenetwork(html,"networkd3.html",selfcontained=true)

生成的networkd3.html文件如下:

#例2

# 直接载入数据包(数据框)

data(mislinks)

注:source和target列的数字代表misnodes数据中name列从0开始排序,如myriel为0,napoleon为1,mlle.baptistine为2,依次类推;value列可表现为关系对线条的粗细,值越大,线条越粗。

data(misnodes)

注:name为点的名称,group列为点对应的组,size列可表现为点的大小。

# 画图

html <- forcenetwork(links = mislinks, nodes =misnodes,

source = "source", target = "target",

value = "value", nodeid ="name",nodesize="size",

group = "group", opacity = 0.8, zoom = true)

savenetwork(html,"networkd3.html",selfcontained=true)

注:图中所有的点都可以移动,鼠标放在点上面会显示点的名字

# 也可以加上点名和图例

html<-forcenetwork(links = mislinks, nodes =misnodes,source = "source", target = "target",value ="value", nodeid = "name",group = "group", opacity= 0.8, nodesize="size",zoom = true,opacitynohover=true,legend=true)

savenetwork(html,"networkd3.html",selfcontained=true)

有没有一种牛叉哄哄、高大上的感觉,有了networkd3绘制网络图,从此就可以解放您的双手双脚。

推荐阅读

【本文标签】:
【责任编辑】:欧易生物凯发k8官网下载的版权所有:http://www.oebiotech.com转载请注明出处

欧易生物

技术热线:021-34781616 咨询热线:4006-4008-26

上海市闵行区新骏环路138号5幢3层
service@oebiotech.com
欧易生物
欧易生物微信公众号
 网站地图  凯发k8官网下载 copyright © 2016 凯发k8官网下载 保留所有权利