这里我有从 newick 格式绘制简单系统发育树的代码:
library(ape)
t<-read.tree(text="(F:4,( (D:2,E:2):1,(C:2,(B:1,A:1):1):1):1);")
plot(t,use.egde.length=TRUE)
我正在“显示”正确的分支长度，但我希望所有分支都带有拉巴尔。
编辑:
我希望我的情节看起来像这样:
我正在搜索文档，但找不到在 R 中显示分支长度的方法。我该怎么做？
最佳答案
您可以通过提取边长并使用edgelabels()来实现。
# Load package
library(ape)
# Create data
t <- read.tree(text="(F:4,((D:2,E:2):1,(C:2,(B:1,A:1):1):1):1);")
plot(t)
edgelabels(t$edge.length, bg="black", col="white", font=2)
关于r - 如何在系统发育树中显示分支长度，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/33730729/