add vignette
This commit is contained in:
@@ -13,7 +13,7 @@ setClass('xgb.DMatrix')
|
||||
#' data(iris)
|
||||
#' iris[,5] <- as.numeric(iris[,5])
|
||||
#' dtrain <- xgb.DMatrix(as.matrix(iris[,1:4]), label=iris[,5])
|
||||
#' dsub <- slice(dtrain, c(1,2,3))
|
||||
#' dsub <- slice(dtrain, 1:3)
|
||||
#' @export
|
||||
#'
|
||||
slice <- function(object, ...){
|
||||
|
||||
@@ -44,8 +44,8 @@
|
||||
#' @examples
|
||||
#' data(iris)
|
||||
#' iris[,5] <- as.numeric(iris[,5])
|
||||
#' dtrain = xgb.DMatrix(as.matrix(iris[,1:4]), label=iris[,5])
|
||||
#' dtest = dtrain
|
||||
#' dtrain <- xgb.DMatrix(as.matrix(iris[,1:4]), label=iris[,5])
|
||||
#' dtest <- dtrain
|
||||
#' watchlist <- list(eval = dtest, train = dtrain)
|
||||
#' param <- list(max_depth = 2, eta = 1, silent = 1)
|
||||
#' logregobj <- function(preds, dtrain) {
|
||||
|
||||
Reference in New Issue
Block a user