###########################################################
## Example : Classification problem
###########################################################
data(RoughSetData)
decision.table <- RoughSetData$hiring.dt
## determine feature subset/reduct
reduct <- FS.permutation.heuristic.reduct.RST(decision.table, permutation = NULL)
rules <- RI.indiscernibilityBasedRules.RST(decision.table, reduct)
summary(rules)
Run the code above in your browser using DataLab