default_params_cran()
xgb.params <- list(subsample = 0.9, gpu_id = 1)
default_params_cran(subsample = xgb.params$subsample, gpu_id = xgb.params$gpu_id)
xgb.params <- do.call("default_params_cran", xgb.params)
xgb.params
Run the code above in your browser using DataLab