if (FALSE) {
data("attrition", package = "modeldata")
cols_att = setdiff(colnames(attrition), c("MonthlyIncome", "Attrition"))
cb_att = Cubist::cubist(x = attrition[, cols_att],
y = attrition[["MonthlyIncome"]]
)
varSpec(cb_att)
}
Run the code above in your browser using DataLab