-11

次のグラフのようなツリーを構築することは可能ですか? 主にそのツリーは、乗組員の数がクラスにどのように分割されるかを表す必要があります。

df<-data.frame(Titanic)
df_Crew <- df[df$Class=="Crew",]
L <- lapply(1:4, function(i) aggregate(df_Crew$Freq, by=df_Crew[1:i], sum))
L2 <- lapply(L, function(d) data.frame(group=do.call(paste, c(as.list(d[names(d)!="x"]), sep="_")), freq=d$x))
L3<-data.frame()
for(i in 1:3){
    d<-cbind(from=rbind(L2[[i]],L2[[i]])$group,L2[[i+1]])
    L3<-rbind(L3,d)
}
library(igraph)
g <- graph.data.frame(L3, directed=TRUE)
plot(g,layout=layout.reingold.tilford(g,root=1),edge.arrow.size=0.5)
4

1 に答える 1

4

同じロジックを使用してrpartでビルドできます

rpart-> 二分決定木 (CART--> 分類と回帰木)、異なるノードごとに二分/非二分系列を作成し、rpart() に渡します。

他のものと同様に、ロジックを適用して入力形式に変換するためにパッケージを読み取ります。

于 2013-08-19T08:22:38.277 に答える