重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
本篇文章为大家展示了如何用gggenes 画基因结构图,内容简明扼要并且容易理解,绝对能使你眼前一亮,通过这篇文章的详细介绍希望你能有所收获。
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:申请域名、雅安服务器托管、营销软件、网站建设、连平网站维护、网站推广。
install.packages("gggenes")
或者从github下载安装:
devtools::install_github("wilkox/gggenes")
2. 准备输入数据
官方给的例子如下:
> head(example_genes) molecule gene start end strand direction1 Genome5 genA 405113 407035 forward 12 Genome5 genB 407035 407916 forward 13 Genome5 genC 407927 408394 forward 14 Genome5 genD 408387 408737 reverse -15 Genome5 genE 408751 409830 forward 16 Genome5 genF 409836 410315 forward 1
输入数据应该包含6列,分别代表:
物种名 基因名 起始位置 结束位置 基因方向 基因方向
如果不需要考虑画出基因方向的话,只需要前4列数据就行:物种名,基因名,起始位置,结束位置
如果加上基因方向,就需要加上 strand 这一列,正负链分用“forward”和“reverse”表示。示例数据中的 direction 这一列是多余的,并不会被用到。
2. 作图
library(ggplot2)
library(gggenes)
ggplot(example_genes, aes(xmin = start, xmax = end,
y = molecule, fill = gene)) +
geom_gene_arrow() +
facet_wrap(~ molecule, scales = "free", ncol = 1) +
scale_fill_brewer(palette = "Set3") +
theme_genes()
图如下:
可以看出来,使用的是我们熟悉的ggplot2语法,再加上 geom_gene_arrow() 函数来实现了基因结构的作图。
下面的我们加上方向,也加上基因名称,代码如下:
ggplot(example_genes, aes(xmin = start, xmax = end, y = molecule, fill = gene, label = gene, forward = direction)) + geom_gene_arrow() + facet_wrap(~ molecule, scales = "free", ncol = 1) + scale_fill_brewer(palette = "Set3") + theme_genes() + geom_gene_label(align = "left")
label = gene, forward = direction 指定了基因名和基因方向
geom_gene_label(align = "left") 在图上添加了基因名并靠左对齐
3. 其他用法
gggenes也可以如上图所示展现基因结构域特征或者比对信息,可以使用geom_subgene_arrow() 函数来实现,需要额外用到另一份数据example_subgenes,代码如下:
> head(example_subgenes) molecule gene start end strand subgene from to1 Genome5 genA 405113 407035 forward genA-1 405774 4065382 Genome5 genB 407035 407916 forward genB-1 407458 4078973 Genome5 genC 407927 408394 forward genC-1 407942 4081584 Genome5 genC 407927 408394 forward genC-2 408186 4082095 Genome5 genC 407927 408394 forward genC-3 408233 408257
ggplot(example_genes, aes(xmin = start, xmax = end, y = molecule)) + facet_wrap(~ molecule, scales = "free", ncol = 1) + geom_gene_arrow(fill = "white") + geom_subgene_arrow(data = example_subgenes, aes(xmin = start, xmax = end, y = molecule, fill = gene, xsubmin = from, xsubmax = to), color="black", alpha=.7) + theme_genes()
上述内容就是如何用gggenes 画基因结构图,你们学到知识或技能了吗?如果还想学到更多技能或者丰富自己的知识储备,欢迎关注创新互联行业资讯频道。