Corrected lapply comment in callbacks.R (#6967)
The comment was made false by the removal of the pipes.
This commit is contained in:
parent
a4886c404a
commit
42fc7ca6a0
@ -641,7 +641,7 @@ cb.gblinear.history <- function(sparse=FALSE) {
|
|||||||
if (!is.null(env$bst)) { # # xgb.train:
|
if (!is.null(env$bst)) { # # xgb.train:
|
||||||
coefs <<- list2mat(coefs)
|
coefs <<- list2mat(coefs)
|
||||||
} else { # xgb.cv:
|
} else { # xgb.cv:
|
||||||
# first lapply transposes the list
|
# second lapply transposes the list
|
||||||
coefs <<- lapply(
|
coefs <<- lapply(
|
||||||
X = lapply(
|
X = lapply(
|
||||||
X = seq_along(coefs[[1]]),
|
X = seq_along(coefs[[1]]),
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user