我想知道是否有一个函数将标识符应用于给定树状图(二叉树)中的所有节点。
所以我想要一个函数,它在给定树上之后会执行以下操作:
attr(tr,"ID") ## should give 1 or 1
attr(tr[[1]],"ID") ## should give 2 or 10
attr(tr[[2]],"ID") ## should give 3 or 11
attr(tr[[c(1,1)]],"ID") ## should give 4 or 100
ETC...
并且,如果以 binaryID 110(头节点的 ID)开头
它的第一个孩子 ID 应该是 1100 它的第二个孩子 ID 应该是 1101
注意: -dendrapply()
将函数应用于树中的所有节点
包使用=“统计”
D=rbind(
+ c(1,1,1,1,1),
+ c(1,2,1,1,1),
+ c(2,2,2,2,2),
+ c(2,2,2,2,1),
+ c(3,3,3,3,3),
+ c(3,3,3,3,2))
Ddend=as.dendrogram(hclust.vector(D))
funID<-function(tr,StartID){
.....
attr(n,"ID")= ID # for all the nodes in tr
}
funID 是什么?