set.seed(290875)
readingSkills.cf <- party::cforest(score ~ ., data = party::readingSkills,
control = party::cforest_unbiased(mtry = 2, ntree = 100))
## Selection Frequency
selFreq(readingSkills.cf)
Run the code above in your browser using DataLab