很多軟件運(yùn)行需要二叉樹桨螺,但是往往我們運(yùn)行得到的不是標(biāo)準(zhǔn)二叉樹蜒茄,可以使用ape R 包進(jìn)行轉(zhuǎn)換
報(bào)錯(cuò)信息:Error in check.tree(tree) : 'tree' must be ultrametric
轉(zhuǎn)換方法
> install.packages("ape")#下載ape包
> library(r8s)#載入ape包
> tree <- read.tree('FigTree30.tree') #讀取目標(biāo)樹
> is.ultrametric(tree)#檢測目標(biāo)樹是否為二叉樹
[1] FALSE
> tre2 <- chronoMPL(tree)#將 目標(biāo)樹轉(zhuǎn)為二叉樹
> is.ultrametric(tre2)#檢測轉(zhuǎn)換后的樹是否為二叉樹
[1] TRUE #轉(zhuǎn)換完成