phy.deresolve(spacodiR)
phy.deresolve()所属R语言包:spacodiR
collapse phylogenetic nodes into multichotomies
崩溃的系统发育节点到multichotomies
译者:生物统计家园网 机器人LoveR
描述----------Description----------
collapses phylogenetic dichotomies within a temporal range into multichotomies
倍数系统发育的二分法时间到multichotomies范围内
用法----------Usage----------
phy.deresolve(phy, time.range = c(0, 0), relative = TRUE)
参数----------Arguments----------
参数:phy
a phylogenetic tree of class phylo; see read.tree
类的进化树phylo; read.tree
参数:time.range
a supplied temporal range, within which nodes will be collapsed
提供的时间范围内将被倍数的节点
参数:relative
whether relative branch lengths are used (e.g., root is 1; present is 0)
不论是相对的分支长度(例如,根是1,现在是0)
Details
详细信息----------Details----------
If time.range is supplied as a single value, phy.deresolve will assume that the user intended a range whose minimum is
如果time.range提供一个单一的值,phy.deresolve会假设用户试图使用一个范围的最低
值----------Value----------
A phylogenetic tree of class phylo
系统进化树类phylo
(作者)----------Author(s)----------
Jonathan Eastman, based on <code><a href="../../ape/html/di2multi.html">di2multi</a></code> by Emmanuel Paradis
实例----------Examples----------
data(sp.example)
attach(sp.example)
## An example with an internal temporal bin[#例如,一个内部的时间斌]
# arbitrarily transform tree to a root age of 100[随意变换树的根100岁,]
phy$edge.length=phy$edge.length*(100/max(branching.times(phy)))
# collapse nodes within the middle half of the tree's history[在中间一半的倍数节点树的历史]
mulphy=phy.deresolve(phy=phy, time.range=c(0.05, 0.95))
# compare result with original tree[比较结果与原来的树]
plot(mulphy, show.tip.label=FALSE)
mtext("multifurcations in the middle nine-tenths")
dev.new()
plot(phy, show.tip.label=FALSE)
mtext("original phylogeny")
## An example with time.range given by a single value[#一个例子给出了time.range的由一个单一的价值]
mulphy=phy.deresolve(phy=phy, time.range=0.25) # affects the most recent quarter of the tree[影响最近一个季度的树]
dev.new()
plot(mulphy, show.tip.label=FALSE)
mtext("multifurcations in the most recent quarter")
## An example showing effect of 'relative'[#一个例子显示效果的“相对”]
phy$edge.length=phy$edge.length*(100/max(branching.times(phy)))
dev.new()
plot(dd<-phy.deresolve(phy=phy, time.range=c(0,1), relative=FALSE))
mtext("relative = FALSE")
dev.new()
plot(rr<-phy.deresolve(phy=phy, time.range=c(0,1), relative=TRUE))
mtext("relative = TRUE")
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|