# NOT RUN {
sub = cv_split(UCICreditCard, k = 30)[[1]]
dat = UCICreditCard[sub,]
x_list = c("LIMIT_BAL")
B_model = training_model(dat = dat,
model_name = "UCICreditCard",
target = "default.payment.next.month",
x_list = x_list,
occur_time =NULL,
obs_id =NULL,
dat_test = NULL,
preproc = FALSE,
outlier_proc = FALSE,
missing_proc = FALSE,
feature_filter = NULL,
algorithm = list("LR"),
LR.params = lr_params(lasso = FALSE,
step_wise = FALSE,
score_card = FALSE),
breaks_list = NULL,
parallel = FALSE,
cores_num = NULL,
save_pmml = FALSE,
plot_show = FALSE,
vars_plot = FALSE,
model_path = tempdir(),
seed = 46)
# }
Run the code above in your browser using DataLab