R/models.R
Find the threshold, give the max metric
h2o.find_threshold_by_max_metric(object, metric)
H2OBinomialMetrics
"F1," for example