Skip to content

Commit

Permalink
fix R CRAN check
Browse files Browse the repository at this point in the history
  • Loading branch information
sebhrusen committed Feb 2, 2024
1 parent 458f902 commit 16b2444
Show file tree
Hide file tree
Showing 3 changed files with 15 additions and 1 deletion.
9 changes: 9 additions & 0 deletions h2o-bindings/bin/custom/R/gen_pipeline.py
Original file line number Diff line number Diff line change
Expand Up @@ -17,3 +17,12 @@
}
"""
)

doc = dict(
preamble="""
Build a pipeline model given a list of transformers and a final model.
Currently R model pipelines, as produced by AutoML for example,
are only available as read-only models that can not be constructed and trained directly by the end-user.
""",
)
5 changes: 5 additions & 0 deletions h2o-r/h2o-package/R/pipeline.R
Original file line number Diff line number Diff line change
Expand Up @@ -3,6 +3,11 @@
#'
# -------------------------- pipeline -------------------------- #
#'
#' Build a pipeline model given a list of transformers and a final model.
#'
#' Currently R model pipelines, as produced by AutoML for example,
#' are only available as read-only models that can not be constructed and trained directly by the end-user.
#'
#' @param model_id Destination id for this model; auto-generated if not specified.
#' @export
h2o.pipeline <- function(model_id = NULL)
Expand Down
2 changes: 1 addition & 1 deletion h2o-r/tests/testdir_misc/runit_connect.R
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ to_src <- c("aggregator.R", "classes.R", "connection.R","config.R", "constants.R
"coxph.R", "coxphutils.R", "gbm.R", "glm.R", "gam.R", "glrm.R", "kmeans.R", "deeplearning.R", "randomforest.R", "generic.R",
"naivebayes.R", "pca.R", "svd.R", "locate.R", "grid.R", "word2vec.R", "w2vutils.R", "stackedensemble.R", "rulefit.R",
"predict.R", "xgboost.R", "isolationforest.R", "psvm.R", "segment.R", "tf-idf.R", "explain.R", "permutation_varimp.R",
"extendedisolationforest.R", "upliftrandomforest.R")
"extendedisolationforest.R", "upliftrandomforest.R", "pipeline.R")
src_path <- paste(h2oRDir,"h2o-package","R",sep=.Platform$file.sep)
invisible(lapply(to_src,function(x){source(paste(src_path, x, sep = .Platform$file.sep))}))

Expand Down

0 comments on commit 16b2444

Please sign in to comment.