# NOT RUN {
library(randomForestSRC)
data(veteran)
veteran_mod <- rfsrc(Surv(time, status) ~ .,
data = veteran,
ntree = 5, forest = TRUE,
membership = TRUE
)
veteran_mod_pmml <- pmml(veteran_mod)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab