Check if character
is.character(x)if (FALSE) { # \dontrun{
library(h2o)
h2o.init()
f <- "https://s3.amazonaws.com/h2o-public-test-data/smalldata/coxph_test/heart.csv"
heart <- h2o.importFile(f)
heart["transplant"] <- as.character(heart["transplant"])
is.character(heart["transplant"])
} # }