这篇文章给大家介绍R语言ggtree如何按照指定的节点旋转树,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。
R语言里的ggtree这个包可视化进化树有一个默认的顺序,如果想要改变枝的相对位置应该如何实现呢?通过查找ggtree作者写的帮助文档找到了对应的办法,可以使用
rotate()
函数
mtcars
df<-mtcars[,c(1,3:6)]
df
df.hclust<-hclust(dist(df))
library(ggtree)
ggtree(df.hclust)+
geom_tiplab(offset = 2)+
xlim(NA,280)+
geom_highlight(node = 34,fill="blue")
我们看到图上标记蓝色的一个分支默认是在最底下的,如果想要把这个分支放到顶上应该如何修改呢?可以直接用ggtree中的
rotate()
函数。rotate()
接受两个参数,一个是需要旋转的节点。另外一个就是树
ggtree(df.hclust)+
geom_tiplab(offset = 2)+
xlim(NA,280)+
geom_text(aes(label=node))
通过上图我们看到需要旋转的是33节点
p1<-ggtree(df.hclust)+
geom_tiplab(offset = 2)+
xlim(NA,280)
#geom_highlight(node = 34,fill="blue")
p2<-ggtree::rotate(p1,33)
p2+
geom_hilight(node=34,fill="blue")
这样就把这一大块放到上面去了。
细心的读者可能发现了,这里在使用rotate()这个函数的时候写法是
ggtree::rotate(p1,33)
,这样是为了使用指定包里的某个函数,因为R语言里的函数很多,有可能会重名,有时候你用到的函数可能并不是想实现功能的那个函数,所以比较保险的做法还是加上包的命名然后用两个冒号链接函数
ggtree(df.hclust)+
geom_tiplab(angle=90,offset = -70)+
layout_dendrogram()
关于R语言ggtree如何按照指定的节点旋转树就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。