Remove silent parameter. (#5476)

R-package/R/xgb.train.R

@@ -267,7 +267,7 @@ xgb.train <- function(params = list(), data, nrounds, watchlist = list(),
   }
 
   # evaluation printing callback
-  params <- c(params, list(silent = ifelse(verbose > 1, 0, 1)))
+  params <- c(params)
   print_every_n <- max( as.integer(print_every_n), 1L)
   if (!has.callbacks(callbacks, 'cb.print.evaluation') &&
       verbose) {

R-package/tests/testthat/test_basic.R

@@ -314,7 +314,7 @@ test_that("colsample_bytree works", {
   watchlist <- list(train = dtrain, eval = dtest)
    # Use colsample_bytree = 0.01, so that roughly one out of 100 features is
   # chosen for each tree
-  param <- list(max_depth = 2, eta = 0, silent = 1, nthread = 2,
+  param <- list(max_depth = 2, eta = 0, verbosity = 0, nthread = 2,
                 colsample_bytree = 0.01, objective = "binary:logistic",
                 eval_metric = "auc")
    set.seed(2)