## veteran data
## randomized trial of two treatment regimens for lung cancer
data(veteran, package = "randomForestSRC")
veteran_rf <- rfsrc(Surv(time, status) ~ ., data = veteran, ntree = 100)
plot.gg_rfsrc(veteran_rf)
plot.gg_error(veteran_rf)
Run the code above in your browser using DataLab