Hendrik/xgboost
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

use short-circuiting scalar &&

Browse Source
This commit is contained in:
Vadim Khotilovich 2016-05-02 01:01:22 -05:00
parent 79c7c9e5bb
commit 5a78118396
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
R-package/R/xgb.Booster.R
View File

@ -197,7 +197,7 @@ xgb.attr <- function(object, which) {
handle = xgb.get.handle(object, "xgb.attr")
# TODO: setting NULL value to remove an attribute
.Call("XGBoosterSetAttr_R", handle, as.character(which)[1], as.character(value)[1], PACKAGE="xgboost")
if (is(object, 'xgb.Booster') & !is.null(object$raw)) {
if (is(object, 'xgb.Booster') && !is.null(object$raw)) {
object$raw <- xgb.save.raw(object$handle)
}
object