摘要
不支援 PMML。 以下是因應措施。
RevoScaleR 的 rxDTree 物件，都可以強制型轉為 rpart 物件。（請注意該 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))
