[R] discourage use of regex for fixed string comparisons (#8736)

2023-01-30 04:47:21 -06:00
parent 1325ba9251
commit 0d8248ddcd
8 changed files with 20 additions and 19 deletions
--- a/demo/kaggle-otto/otto_train_pred.R
+++ b/demo/kaggle-otto/otto_train_pred.R
@@ -7,7 +7,7 @@ train <- train[, -1]
 test <- test[, -1]

 y <- train[, ncol(train)]
-y <- gsub('Class_', '', y)
+y <- gsub('Class_', '', y, fixed = TRUE)
 y <- as.integer(y) - 1  # xgboost take features in [0,numOfClass)

 x <- rbind(train[, -ncol(train)], test)