一、什么是ggtree

ggtree是一个基于ggplot2的R语言包,它可以用于绘制和可视化进化树,其功能强大,可以满足各种进化树的绘制需求,包括树形图、系统发育树、系统发育图等。

二、ggtree添加图片注释

使用ggtree给进化树添加图片注释,首先需要准备好要添加的图片,然后在R语言中使用以下代码:

library(ggtree)
tree <- read.tree("tree.nwk")
ggtree(tree) + geom_tiplab(aes(label = label, image = image)) +
geom_tippoint(color = "red", size = 2) +
theme(legend.position = "none")

其中,tree.nwk是要添加图片注释的进化树文件,label是添加的文字注释,image是添加的图片注释,geom_tiplab()函数用于添加文字注释,geom_tippoint()函数用于添加图片注释,theme()函数用于去掉图例。

三、实例演示

下面是一个简单的使用ggtree添加图片注释的实例:

library(ggtree)
library(ape)
tree <- read.tree("tree.nwk")
image <- c("bird.jpg", "cat.jpg", "dog.jpg")
label <- c("bird", "cat", "dog")
ggtree(tree) +
geom_tiplab(aes(label = label, image = image)) +
geom_tippoint(color = "red", size = 2) +
theme(legend.position = "none")

运行上述代码后,将得到如下结果:

dT2V6f.png