2017-08-09 4 views

答えて

2

library("rpart") 
library("partykit") 
rp <- rpart(Kyphosis ~ Age + Number + Start, data = kyphosis) 
party_rp <- as.party(rp) 

plot(party_rp) 
エッジを描画するためのデフォルトのパネル機能は edge_simpleは、いくつかの正当化戦略を実装ラベル:ラベルは、どちらかのエッジを越え "alternate"は、 "decreasing""increasing"、または "equal"ことができます。しかし、これらの正当化戦略は、 justminの最小ラベル長から始まり、デフォルトで Inf(つまり、正当化されない)から採用されるだけである。詳細は、 ?edge_simpleを参照してください。

plot(party_rp, 
    ep_args = list(justmin = 1, just = "increasing")) 

edge_simple

:あなたは正当化が "increasing"常には(すなわち、 justmin = 1)を適用した例を見てみたかった

関連する問題