# NOT RUN {
result <- nb("titanic", "survived", c("pclass","sex","age"))
pred <- predict(result, pred_data = "titanic")
store(pred, data = titanic, name = "pred") %>% head
store(pred, data = titanic) %>% head
# }
Run the code above in your browser using DataLab