# NOT RUN {
library(tools4uplift)
data("SimUplift")
train.enhanced <- BinUpliftEnhanced(data = SimUplift, treat = "treat", outcome = "y",
var.list = colnames(SimUplift[,3:7]))
# }
Run the code above in your browser using DataLab