add vignette

This commit is contained in:
hetong
2014-08-29 11:40:15 -07:00
parent 086433da0d
commit 5f510c683b
4 changed files with 179 additions and 4 deletions

View File

@@ -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, ...){

View File

@@ -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) {