# NOT RUN {
## The direct application of this function is an advanced use that consists of using this
# function directly to evaluate a set of features
## Classification problem
# A discrete dataset is used (in this case we use only several discrete columns)
adult <- adult[,c(4,9,10,15)]
# Generate the evaluation function with Cramer
mi_evaluator <- mutualInformation()
# Evaluate the features (parameters: dataset, target variable and features)
mi_evaluator(adult,'income',c('race','sex','education'))
# }
Run the code above in your browser using DataLab