if (FALSE) {
data(iris)
# 1) Ensure target is a factor for IG-based ranking
iris2 <- iris
iris2$Species <- as.factor(iris2$Species)
# 2) Fit selector and inspect chosen features
fs <- daltoolbox::fit(fs_ig("Species"), iris2)
fs$features # names of selected predictors
# 3) Subset data to selected features + target
data_ig <- daltoolbox::transform(fs, iris2)
head(data_ig)
}
Run the code above in your browser using DataLab