Modelos de rxDForest podem ser exportados em PMML

Sumário

Não há suporte para PMML.  Aqui está uma solução alternativa.

Objetos do rxDTree do RevoScaleR podem ser forçados a objetos rpart. (Observe que rpart é um pacote recomendado que talvez você precise carregar).

 

Library(rpart)

método <-"classe"

formulário <-Kyphosis ~ número + iniciar

parâmetros <-lista (anterior = c (0,8, 0,2), perda = c (0, 2, 3, 0),

divisão = "gini")

controle <-rpart.control (minsplit = 5, minbucket = 2, cp = 0,01,

MaxDepth = 10, maxcompete = 4, maxsurrogate = 5, usesurrogate 20 = 2, surrogatestyle = 0, xval = 0)

custo <-1 + seq(length(attr(terms(form), "term.labels")))

rxDTreeObj <-rxDTree (fórmula = Kyphosis ~ número + Iniciar,

dados = kyphosis, método = método, parâmetros = parâmetros,

controle = controle de custo = custo)

PMML(as.rpart(rxDTreeObj))