Résumé
PMML n’est pas pris en charge. Voici une solution de contournement.
Objets de rxDTree de RevoScaleR pouvant être converties en objets de rpart. (Notez que rpart est un package recommandé que vous devrez charger.)
Library(rpart)
méthode <-« classe »
formulaire <-Kyphosis ~ nombre + Démarrer
parms <-liste (préalable = c (0,8, 0,2), perte = c (0, 2, 3, 0),
Fractionner = « gini »)
contrôle <-rpart.control (minsplit = 5, minbucket = 2, cp = 0,01,
MaxDepth = 10, maxcompete = 4, maxsurrogate = 5, 20 usesurrogate = 2, surrogatestyle = 0, xval = 0)
coût <-1 + seq(length(attr(terms(form), « term.labels »)))
rxDTreeObj <-rxDTree (formule = Kyphosis ~ nombre + Start,
données = kyphosis, la méthode = méthode parms = parms,
contrôle = contrôle, coût = coût)
PMML(As.rpart(rxDTreeObj))