概要
PMML はサポートされていません。 回避策を次に示します。
Rpart オブジェクトには、RevoScaleR の rxDTree オブジェクトを変換できます。(その rpart は、推奨されるパッケージをロードする必要がありますに注意してください)。 library(rpart) メソッド <-[クラス] フォーム <-Kyphosis ~ 番号 + スタート parms <-一覧 (以前 = c (0.8, 0.2)、損失 = c (0, 2、3, 0) 分割 ="gini") コントロール <-rpart.control (minsplit = 5、minbucket = 2、cp = 0.01、 maxdepth = 10、maxcompete = 4、maxsurrogate = 5、20 usesurrogate = 2、surrogatestyle = 0、xval = 0) コスト <-1 + seq(length(attr(terms(form)、"term.labels"))) rxDTreeObj <-rxDTree (数式 = Kyphosis ~ 数 + スタート データ = kyphosis、メソッド メソッドでは、parms を = = parms、 コントロール = コスト、管理コストを =) pmml(as.rpart(rxDTreeObj))