Kopsavilkums
PMML netiek atbalstīta. Šeit ir risinājums.RevoScaleR ir rxDTree objekti var pakļaut rpart objekti. (Ņemiet vērā, ka rpart ir ieteicamā pakotni, kurai vēlaties ielādēt.) Library(rpart)metode <-"klase"veidlapas <-Kyphosis ~ numuru + sāktparms <-saraksts (iepriekš = c (0.8 0.2), zaudējumu = c (0, 2, 3, 0)sadalītais = "Džini")vadības <-rpart.control (minsplit = 5 minbucket = 2, cp = 0,01,maxdepth = 10 maxcompete = 4 maxsurrogate = 5 20 usesurrogate = 2 surrogatestyle = 0, xval = 0)izmaksu <-1 + seq(length(attr(terms(form), "term.labels")))rxDTreeObj <-rxDTree (formulu = Kyphosis ~ numuru + sāktdatu kyphosis metode = = metode parms = parms,vadības kontroles izmaksas = = izmaksas)pmml(as.rpart(rxDTreeObj))
