# NOT RUN {
Preds <- AutoH2OMLScoring(
ScoringData = data,
ModelObject = NULL,
ModelType = "mojo",
H2OShutdown = TRUE,
H2OStartUp = TRUE,
MaxMem = {gc();paste0(as.character(floor(as.numeric(system("awk '/MemFree/ {print $2}' /proc/meminfo", intern=TRUE)) / 1000000)),"G")},
NThreads = max(1, parallel::detectCores()-2),
JavaOptions = '-Xmx1g -XX:ReservedCodeCacheSize=256m',
ModelPath = normalizePath("./"),
ModelID = "ModelTest",
ReturnFeatures = TRUE,
TransformNumeric = FALSE,
BackTransNumeric = FALSE,
TargetColumnName = NULL,
TransformationObject = NULL,
TransID = NULL,
TransPath = NULL,
MDP_Impute = TRUE,
MDP_CharToFactor = TRUE,
MDP_RemoveDates = TRUE,
MDP_MissFactor = "0",
MDP_MissNum = -1)
# }
Run the code above in your browser using DataLab