סיכום
PMML אינו נתמך. הנה דרך לעקיפת הבעיה.אפשרות לאלץ rxDTree אובייקטים של RevoScaleR לאובייקטים rpart. (שים לב ש-rpart זו היא חבילה מומלצים אשר ייתכן שיהיה עליך לטעון). library(rpart)שיטת <-"class"טופס <-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))
