Sammendrag
PMML støttes ikke. Her er en midlertidig løsning.Revoscaler's rxDTree-objekter kan bli tvunget til rpart objekter. (Vær oppmerksom på at rpart er en anbefalt pakke som du må kanskje laste inn.) Library(rpart)metoden <-"klasse"skjemaet <-Kyphosis ~ nummer + Startparametrene <-listen (tidligere = c (0,8, 0,2), tap = c (0, 2, 3, 0),Del = "gini")kontroll <-rpart.control (minsplit = 5, minbucket = 2, cp = 0,01,MaxDepth = 10, maxcompete = 4, maxsurrogate = 5, 20 usesurrogate = 2, surrogatestyle = 0, xval = 0)kostnader <-1 + seq(length(attr(terms(form), "term.labels")))rxDTreeObj <-rxDTree (formelen = Kyphosis ~-startnummer + Start,data = kyphosis, metoden = metode for parametrene = parametrene,kontroll = kontroll, koster = kostnad)pmml(AS.rpart(rxDTreeObj))
