Merge pull request dmlc#830 from fsimond/patch-1

Fix CV which was monitoring train-metric
shaocf · Feb 15, 2016 · 9b2b81e · 9b2b81e
2 parents 70d9732 + 2443cb9
commit 9b2b81e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R-package/R/xgb.cv.R b/R-package/R/xgb.cv.R
@@ -191,7 +191,7 @@ xgb.cv <- function(params=list(), data, nrounds, nfold, label = NULL, missing =
 
         # early_Stopping
         if (!is.null(early.stop.round)){
-            score <- strsplit(ret,'\\s+')[[1]][2 + length(metrics)]
+            score <- strsplit(ret,'\\s+')[[1]][1 + length(metrics) + 2]
             score <- strsplit(score,'\\+|:')[[1]][[2]]
             score <- as.numeric(score)
             if ( (maximize && score > bestScore) || (!maximize && score < bestScore)) {