demo/FS.nearOpt.fvprs.FRST.R

 data(RoughSetData)
 decision.table <- RoughSetData$pima7.dt 
 
 ## get reduct
 reduct.2 <- FS.nearOpt.fvprs.FRST(decision.table)
 print(reduct.2)
 
 ## get new decision table according to the reduct
 new.decTable <- SF.applyDecTable(decision.table, reduct.2)
 print(new.decTable)
janusza/RoughSets documentation built on Jan. 26, 2020, 11:22 p.m.