# use iris data
# build random forests model with certain parameters
model <- CoreModel(Species ~ ., iris, model="rf",
selectionEstimator="MDL",minNodeWeight=5,rfNoTrees=100)
# prediction with node distribution
pred <- predict.CoreModel(model, iris, rfPredictClass=FALSE)
# Model evaluation
mEval <- modelEval(model, iris[["Species"]], pred$class, pred$prob)
print(mEval)
Run the code above in your browser using DataLab