[R] remove more uses of default values in internal functions (#9476)

This commit is contained in:
James Lamb
2023-08-14 09:18:33 -05:00
committed by GitHub
parent 2c84daeca7
commit e3f624d8e7
4 changed files with 16 additions and 4 deletions

View File

@@ -194,7 +194,13 @@ xgb.cv <- function(params = list(), data, nrounds, nfold, label = NULL, missing
# create the booster-folds
# train_folds
dall <- xgb.get.DMatrix(data, label, missing, nthread = params$nthread)
dall <- xgb.get.DMatrix(
data = data,
label = label,
missing = missing,
weight = NULL,
nthread = params$nthread
)
bst_folds <- lapply(seq_along(folds), function(k) {
dtest <- slice(dall, folds[[k]])
# code originally contributed by @RolandASc on stackoverflow